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.REM • 



PRWUCT CODE: 
PR03UCT NAME: 
DATE: 

lAINTAZNER: 
AUTHOR: 



IDENTIFICATION 
AC-8468C>NC 

CZDHGCO OHll nULTI-LINE DATA TEST 
JUNE 1985 

NAC SOFTWARE ENGINEERING 
G. BAISLEY 



THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS 
DOCUMENT. 

NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF SOFTWARE ON 
EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS AFFILIATED 
COMPANIES 



COPYRIGHT (C) 1985 BY DIGITAL EQUIPMENT CORPORATION 
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1 PAGE 2 

2 

3 

4 1.0 ABSTRACT 

5 

6 THE SINGLE LINE PARITY TEST CHECKS THAT THE PARITY ERROR FLAG ASSERTS 

7 FOR ALL 16 LINES. . .ONE LINE AT A TIME. 
8 

9 THE DHll MU.TI-LINE DATA TEST TRANSMITS BINARY COUNT PATTERNS ON ALL 

10 16 LINES SIMl^TANEOUSLY. ALSO. PARITY GENERATION LOGIC AND PARITY 

11 RECEPTION LOGIC IS VERIFIED. (ODD C EVEN PARITY FOR 5, 6, 7. 8 LEVEL 

12 CODES) 
13 

14 
15 

16 2.0 REQUIREMENTS 

17 

18 

19 

20 2.1 EQUIPMENT 

21 

22 PDP-11 FAMILY STANDARD COMPUTER WITH 4KU OF MEMORY 

23 ASR-33 TELETYPE OR EQUIVALENT 

24 DHll ASYNCHRONOUS MULTIPLEXER 

25 OMll MAINTENANCE CARD INSTALLED 
26 

27 
28 

29 2.2 STORAGE 

30 

31 THE PROGRAM LOADS INTO 4KU OF MEMORY 

32 

33 

34 

35 3.0 LOADING PROCEDURE 

36 

37 THE STANDARD PROCEDURE FOR LOADING ABSOLUTE BINARY TAPES IS TO BE USED 

38 

39 

40 

41 4.0 STARTING PROCEDURE 

42 

43 

44 

45 4.1 CONTROL SUITCH SETTINGS 

46 

47 

48 

49 4.1.1 AFTER PROGRAM LOAD (INITIAL PROGRAM START) 

SO 

51 ALL CONSOLE SWITCHES DOWN 
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SEQ 3 



1 PAGE 3 

2 

3 

4 4.1.2 TO nOOIFY DEVICE VECTOR AND CONTROL REGISTER ADDRESSES AFTER 

5 PRXRAM RESTART 
6 

7 SUOO-1 
8 
9 
10 

11 4.1.3 TO START PROGRAM AT SELECTED TEST AFTER PROGRAM "RESTART 

12 

13 SUOl-1 

14 

IS 

16 

17 4.2 STARTING ADDRESS 

1? 

J 9 THE STARTING ADDRESS FOR ALL TESTS IS 000200 

20 THE RESTART ADDRESS FOR ALL TESTS IS 0002000 

21 THE STARTING ADDRESS TO ENTER A SELECTED TEST IS 000200 
22 

23 
24 

25 4.3 PROGRAM AND/OR OPERATOR ACTION 

26 

27 

28 

29 4.3.1 INITIAL PROGRAM HART 

30 

31 

32 

33 4.3.1.1 LOAD PROGRAM INTO MEMORY 

34 

35 

36 

37 4.3.1.2 LOAD ADDRESS 000200 

38 

39 

40 

41 4.3.1.3 CLEAR CONSOLE SMITCHES 

42 

43 

44 

45 4.3.1.4 PRESS START 

46 

47 

48 

49 4.3.1.5 THE PROGRAM WILL TYPE "DHll MULTI-LINE DATATEST" AND WILL 

50 THEN TYPE "VECTOR ADDRESS-" AND WAIT FOR AN INPUT FROM THE TELETYPE 

51 KEYBOARD. 



CZDHG-CO 



1 
2 
3 
4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 
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IS 
19 
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22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
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41 
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43 
44 
45 
46 
47 
48 
49 
SO 
51 



MACRO V04.00 27-JUN-85 13:01:48 PAGE 4 



PAGE 4 



4.3.1.6 TYPE IN THE ADDRESS OF THE RECEIVER INTERRUPT VECTOR FOR THE 
OHll TO BE TESTED FOLLOUED BY <CARRIAGE RETURN> 



NOTE 

WORDS IN ANGLE BRACKETS. I.E. <CARRIAGE 
RETURN> MEAN THAT THE TELETYPE KEY WITH 
THE NAMED FUNCTION SHOULD BE STRUCK 



IF AN INCORRECT ADDRESS IS ENTERED. THE PROGRAM WILL TYPE "?" AND WILL 
REPEAT THE SECOND MESSAGE OF 4.3.1.5 



4.3.1.7 THE PROGRAM WILL TYPE "CONTROL REGISTER ADDRESS-" AND WAIT 
FOR AN INPUT FROM THE TELETYPE KEYBOARD 



4.3.1.8 TYPE IN THE ADDRESS OF THE SYSTEM CONTROL REGISTER OF THE 
OHll TO BE TESTED FOLLOWED BY <CARRIAGE RETURN> 

IF AN INCORRECT ADDRESS IS TYPED. THE PROGRAM WILL TYPE AND WILL 

THEN REPEAT THE OF 4.3.1.7 



4.3.1.9 THE PROGRAM WILL TYPE "R" TO INDICATE THAT IT IS ABOUT TO 
START TESTING. AND THEN TESTING WILL BEGIN 



4.3.2 PROGRAM RESTART WITH ALL SWITCHES DOWN 



4.3.2.1 PERFORM 4.3.1.2 TO 4.3.1.5 



4.3.2.2 THE PROGRAM WILL TYPE "DHll MULTI-LINE DATATEST" AND WILL 
THEN CONTINUE AS DESCRIBED IN 4.3.1.9 



4.3.3 PROGRAM RESTART WITH SWOO-1 



SEQ 5 
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1 PAGE 5 

2 

3 

4 4.3.3.1 LOAD ADDRESS 000200 

5 

6 

7 

8 4.3.3.2 SET SUOl-1 

9 
10 
11 

12 4.3.3.3 PRESS START 

13 

14 

15 

16 4.3.3.4 THE PROGRAM WILL PERFORM AS DESCRIBED IN 4.3.1.5 TO 4.3.1.9 

17 

IS 

19 

20 4.3.4 PROGRAM RESTART WITH SUOl-1 

21 

22 

23 

24 4.3.4.1 LOAD ADDRESS 000200 

25 

26 

27 

28 4.3.4.2 SET SU01«1 

29 

30 

31 

32 4.3.4.3 PRESS START 

33 

34 

35 

36 4.3.4.4 THE PROGRAM WILL TYPE "DHll MULTI-LINE DATATEST" AND WILL 

37 THEN TYPE "TEST PC-" AND WILL WAIT FOR AN INPUT FROM THE TELETYPE 

38 KEYBOARD 
39 

40 
41 

42 4.3.4.5 TYPE IN THE ADDRESS OF THE TEST AT WHICH THE PROGRAM IS TO BE 

43 STAPTCD ruL-GMtO BY <CARRIAGE RETURN> 
44 

45 
46 

47 4.3.4.6 THE PROGRAM WILL TYPE R TO INDICATE THAT IT HAS STARTED AND 

48 WILL START TESTING AT THE SELECTED TEST. 
49 

50 

51 NOTE 
52 

53 CARE MUST BE TAKEN WHEN THIS FEATURE IS 

54 USED. SINCE THERE IS NO PROTECTION 

55 AGAINST SELECTING AN ADDRESS THAT IS IN 

56 THE MIDDLE OF A TEST 
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SEQ 6 



1 
2 


PAG( 6 


3 
4 

5 


NOTE 


6 


IF IT IS DESIRED TO LOOP ON THE TEST 


7 


THAT IS SELECTED SET SU14-1 BEFORE 


6 


ENTERING THE TEST ADDRESS 


9 

10 




11 




12 




13 




14 


5.0 OPERATING PROCEDURE 


IS 




16 




17 




16 


5.1 OPERATIONAL SUITCH SETTINGS 


19 




20 


Sh15"1, HALT ON ERROR 


21 


Sh14"1, LOOP ON CURRENT TEST 


22 


SU13"l, SUPPRESS ERROR TYPtOUT 


23 


SUll-1. INHIBIT ITERATIONS 


24 


SUlO'l, ESCAPE TO NEXT TEST ON ERROii 


25 


SM09"1, FREEZE VARIABLE PARAMETER IN CURRENT TEST 


2e 


Su01"l. START PROGRAn AT SELECTED TEST 


27 


CLIAAiB 4 Ai i^fcm^ AABAfeif Tf B0 A ▼ BBAf^B AM BP9T ABT 

SU00*1« CHANuE PARAnCTERS AT PROGRAfl RESTART 


26 




29 




30 




31 


5.2 SlVROUTINE ABSTRACTS 


98 




33 





34 




35 


C A 4 ▼BAB/^ATAUfB ft AAATT#^IA AAAAAA AAA^^^ X 

5.2.1 TRAPCATCHER (LOCATIONS 000000-000776) 


36 




37 


TLITt* BBI ITTUf Tl^ 1 UP IfB TB TlUVIf BAf BT 1 lUCT WBtfATtf A VUTPA Ai lAT A « TA AAA 

THIS ROUTINE IS USED TO INTERCEPT UNEXPECTED INTERRUPTS AND TRAPS. 


30 


TUf ABf A PBBU AAAAAA AAA^^£ 1 BAAPA tlWLl TLJP PAI 1 AI A^AIiPft.lA^ 

THE AREA FROn 000000-000776 IS LOADED HiTH THE FOLLOWING SEQUENCE 


39 




40 


A 

2 


41 


A 

0 


42 




43 


0 


44 




45 


^^A 

772 


4b 


0 


47 


f lO 


48 


0 


49 




50 


IF AN UNEXPECTED INTERRUPT OR TRAP OCCURS. THE PROGRAM WILL HALT UITH 


51 


THE PC 2 GREATER THAN THE ADDRESS TO UHICH THE PROGRAM TRAPPED. THE 


52 


PROCESSOR STACK MAY BE EXAMINED TO DETERMINE UHERE THE PROGRAM WAS 


53 


UHEN THE TRAP OR INTERRUPT OCCURED. 
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SEQ 7 



1 PAGE 7 

2 

3 

4 5.2.2 START (PROGRAn INITIALIZATION) 

5 

6 THIS ROUTINE INITIALIZES ALL PROGRAM FLAGS AND COUNTERS. TYPES THE 

7 PROGRAM TITLE MESSAGE. AND INPUTS THE VECTOR AND CONTROL (REGISTER 

8 ADDRESSES OF THE DHll TO BE TESTED. 
9 

10 
11 

12 5.2.3 BEGIN (PROGRAM START AND RESTART) 

13 

14 THIS ROUTINE IS ENTERED IMMEDIATELY AFTER "START" AND EACH TIME A 

15 PROGRAM PASS HAS BEEN COMPLETED. THE ROUTINE SETS UP THE PROCESSOR 

16 STACK AND STATUS UORD AND THEN TRANSFERS CONTROL TO THE TEST AT WHICH 

17 TESTING WILL BEGIN. IF SUOl-O UHEN THIS ROUTINE IS ENTERED TESTING 
la WILL START AT Tl (TEST 1). IF SUOl-1 UHEN THIS ROUTINE IS ENTERED. 
19 TESTING WILL START AT THE PC ENTERED FROM THE TELETYPE KEYBOARD. 

20 
21 
22 

23 5.2.4 EOP (END OF PASS) 

24 

25 THIS ROUTINE IS ENTERED ONCE PER PASS AFTER ALL TESTS HAVE BEEN 

26 COMPLETED. THIS ROUTINE TYPES THE MAINDEC IDENTIFICATION CODE OF THE 

27 PROGRAM. CLEARS ERROR FLAGS AND UPDATES THE PASS COUNT. IF THE 

28 PROGRAM WAS LOADED UNDER ACTll OR OOP. THE ROUTINE CHECKS FOR RETURN 

29 TO THE ACTll OR DOP MONITOR. IF THE PROGRAM IS NOT UNDER MONITOR 

30 CONTROL. THE ROUTINE TRANSFERS TO BEGIN. 
31 

32 
33 

34 5.2.5 SCOPER (SCOPE LOOP AND ITERATION HANDLER) 

35 

36 THIS ROUTINE IS ENTERED EACH TIME A TEST IS COMPLETED. THE ROUTINE 

37 CHECKS FOR THE FOLLOUING UPON ENTRY 
38 

39 1. IF SUlO-1, THE ROUTINE WILL TRANSFER TO THE NEXT TEST IN 

40 SEQUENCE. AFTER CLEARING ERROR FLAGS. 
41 

42 2. IF SUll-1. THE ROUTINE WILL TRANSFER TO THE NEXT TEST 

43 SEQUENCE. AFTER CLEARING ERROR FLAGS. 
44 

45 3. IF SU14-1. THE ROUTINE WILL LOOP ON THE CURRENT TEST 

46 REGARDLESS OF THE ITERATION COUNTt— 
47 

48 IF NONE OF THE ABOVE IS TRUE. THE ROUTINE WILL ADO 1 TO THE COUNT OF 

49 TEST ITERATIONS. AND COMPARE THIS VALUE TO THE NUMBER OF ITERATIONS 

50 THAT SHOULD BE PERFORMED. IF THESE NUMBERS ARE EQUAL. THE ROUTINE 

51 WILL TRANSFER TO THE NEXT TEST IN SEQUENCE. IF THE NUMBERS ARE NOT 

52 EQUAL. THE TEST CURRENTLY IN PROGRESS WILL BE REPEATED. 
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1 PAGE 8 

2 

S 

4 5.2.6 SCOPIR Cfl^EZE ON CURRENT DATA) 
5 

6 THE CALL TO THIS ROUTINE FOLLOWS IHHEDIATELY AFTER THE CALL TO THE 

7 ERROR HANDLER IN THOSE TESTS THAT HAVE VARIABLE PARAMETERS. THIS 
0 ROUTINE IS ALWAYS ENTERED P« THOSE TESTS. WHETHER OR NOT AN ERROR 
9 W:CURS. IF SW09-1. THE ROUTINE WILL TRANSFER CONTROL BACK TO THE TEST 

10 AT A POINT WHICH WILL ALLOW REPEATING THE FUNCTION UNDER TEST 

11 CONTINUOUSLY WITH THE SAME DATA. IF THIS OPTION IS SELECTED. THE 

12 ROUTINE "SCOPER" IS NEVER ENTERED AND ITERATION COUNTS WILL NOT BE 

13 UPDATED. 
14 

15 
16 

17 5.2.7 ERRORS (ERROR HANDLER) 
18 

19 THIS ROUTINE IS ENTERED UPON ERROR DETECTION ONLY. WITH ALL CONSOLE 

20 SWITCHES DOWN. THE ROUTINE PROCEDES AS FOLLOWS: 
21 

22 I. THE PC OF THE INSTRUCTION THAT CALLED THE ERROR HANDLER IS 

23 ACCESSED THRU THE STACK. AND THEN THE EMT INSTRUCTION ITSELF 

24 IS FETCHED. THE 8 LSB OF THE EMT INSTRUCTION ARE THE ERROR 

25 CaOE. THIS CODE IS USED TO ACCESS A TABLE OF ERROR MESSAGES 

26 AND ERROR DATA STORAGE LOCATIONS. 
27 

28 2. IF THE TEST THAT FAILED DID NOT FAIL PREVIOUSLY DURING THIS 

29 PASS, A COMPLETE ERROR REPORT IS MADE IF THE TEST THAT FAILED 

30 FAILED MORE THAN ONCE DURING THE CURRENT PASS, ONLY THE DATA 

31 RELATING TO T^ FAILURE IS TYPED. IF SW13-1. NO ERROR 

32 TYPEOUT IS MADE. 
33 

34 3. THE ROUTINE NOM CHECKS FOR HALT ON ERROR. IF SU15-1 THE 

35 PROGRAM UILL HALT WITH THE PC OF THE CALL TO THE ERROR 

36 ROUTINE IN RO. IF SU15-0. THE PROGRAM UILL NOT HALT. BUT 

37 UILL CHECK FOR ESCAPE TO NEXT TEST. 
38 

39 4. IF SUIO-O, THE ROUTINE UILL RETURN TO THE TEST IN PROGRESS. 

40 IF SUlO-1. THE ROUTINE UILL ABORT THE CURRENT TEST, AND 

41 TRANSFER TO THE NEXT TEST IN SEQUENCE, THRU THE ROUTINE 

42 •SCOPER*. 
43 

44 
45 
46 

47 5.2.8 TRPSRV (TRAP DECODE AND DISPATCH) 
48 

49 THIS ROUTINE DECODES THE 8 LSB OF THE TRAP INSTRUCTION THAT CAUSED THE 

50 PRKRAM INTERRUPT. AND TRANSFERS CONTROL TO THE ROUTINE THRU THE TABLE 

51 "TRPTAB" USING THE 8 LSB OF THE TRAP INSTRUCTION AS AN OFFSET TO THE 

52 POINTER TO THE ROUTINE TO BE ENTERED. 



SEQ 9 
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1 PAGE 9 

2 

3 

4 5.3 PROGRAM AND OR OPERATOR ACTION 

5 

6 

7 

8 5,3.1 PROGRAM START WITH ALL SWITCHES DOWN 

9 
10 
11 

12 5.3.1.1 REFER TO SECTIONS 4.3.1 AND 4.3.2 FOR INITIAL PROGRAM 

13 BEHAVIOR. 
14 

15 
16 

17 5.3.1.2 AFTER "R" HAS BEEN TYPED BY T^€ PROGRAM. TEST EXECUTION WILL 

16 BEGIN. EACH TEST WILL BE REPEATED A SELECTED NUMBER OF ITERATIONS 

19 (SEE LISTING FOR EXACT NUMBER FOR EACH TEST) AND THEN THE PROGRAM WILL 

20 PROCEED TO THE NEXT TEST. 
21 

22 
23 

24 5.3.1.3 WHEN ALL ITERATIONS HAVE BEEN COMPLETED. THE PROGRAM WILL 

25 TYPE -CZDHG-C" AND THEN RESTART TESTING AT TEST 1 (LOCATION Tl IN THE 

26 PROGRAM). 
27 

28 
29 

30 5.3.1.4 IF AN ERROR OCCURS. THE PROGRAM WILL TYPE AN APPROPRIATE 

31 ERROR MESSAGE, AND THEN CONTINUE THE TEST IN PROGRESS. 
32 

33 
34 

35 5.3.2 PROGRAM START WITH SWOO-1 

36 

37 THE PROGRAM WILL PERFORM AS DESCRIBED IN 4.3.1 AND 5.3.1 

38 

39 

40 

41 5.3.3 PROGRAM START WITH SUOl-1 

42 

43 

44 

45 5.3.3.1 REFER TO SECTION 4.3.4 FOR INITIAL PROGRAM BEHAVIOR 

46 

47 

46 

49 5.3.3.2 TEST EXECUTION WILL START AT THE ADDRESS SPECIFIED AND WILL 

50 CONTINUE AS DESCRIBED IN 5.3.1.2 
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SEQ \0 



PAGE 10 



1 
2 
3 

4 5.3.3.3 AFTER "CZOHG-C- HAS BEEN TYPED. THE PROGRAM MILL RESUME TESTING 

5 AT TEST 1 
6 

7 
8 

9 5.3.4 PROGRAM OPERATION UHH SUlS-1 

10 

11 SAME AS 5.3,1. EXCEPT THAT IN THE CASE OF AN ERROR. THE PROGRAM UILL 

12 HALT AFTER THE ERROR TYPEOUT. AND THE PC«2 OF THE CALL TO THE ERROR 

13 ROUTINE UILL BE DISPLAYED IN RO. 
14 

IS 
16 

17 5. 3.5 PROGRAM OPERATION UITH SU13-1 

IS 

19 SANE AS 5.3.1 EXCEPT THAT NO ERROR TYPEOUTS UILL OCCUR 

20 

21 

22 

23 5.3.6 PROGRAM OPERATION UITH SUll-1 

24 

25 SAME AS 5.3.1 EXCEPT THAT EACH TEST UILL BE REPEATED ONCE ONLY 

26 

27 

28 

29 5.3.7 PROGRAM OPERATION UITH SUlO-1 

30 

31 SAME AS 5.3.1. EXCEPT THAT IN THE CASE OF AN ERROR THE CURRENT TEST 

32 UILL BE ABORTED. AND THE PROGRAM UILL PROCEED TO THE NEXT TEST IN 

33 SEQUENCE. 
34 

35 
36 

37 5.3.8 PROGRAM OPERATION UITH SU14>1, OR SU09-1 

38 

39 THESE FUNCTIONS ARE NORMALLY USED FOR TROUBLE SHOOTING. SEE SECTION 

40 6.3 FOR THEIR USE. 
41 

42 
43 
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SCQ 11 



44 6,0 EMiORS 
45 

46 6.1 EMIOR HMLtS 
47 

46 THE ERROR MESSAGE FORMAT FOR ALL ERROR TYPEOUTS IS AS FOLLOWS 
49 

50 PC*2 »1ESSAG£ 

51 HEADER CIF APPLICABLE) 

52 DATA CIF APPLICABLE) 
S3 

54 WHERE 

55 PC*2 IS THE ADDRESS OF THE CALL TO THE ERROR HANDLER ♦ 2> 

56 MESSAGE IS AN ASCII MESSAGE DESCRIBING (BRIEFLY) THE FAILURE t 

57 HEADER IS A DESCRIPTION OF THE DATA TO FOLLOW; 

50 DATA IS OCTAL INFORMATION RELATING TO THE CAUSE OF THE FAILURE. IF 
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1 PAGE II 

2 

3 

4 THE SAME ERRfKM OCCURS IN A GIVEN TEST ON THE SArC PASS. AND If DATA 

5 IS ASSOCIATED WITH THAT ERROR. ONLY DATA IS TYPE ON SUCCEEDING ERROR 

6 TYPEOUTS. 
7 

» IF NO DATA IS ASSOCIATED WITH THE ERROR THE COMPLETE ERROR MESSAGE IS 

9 TYPED. 
10 
11 
12 

IS 6.1.1 ERROR DESCRIPTIONS 

14 

15 SEE LISTING FOR DETAILS OF ERRORS 

16 

17 

IS 

19 6.2 ERROR RECOVERY 

20 

21 

22 

2S 6.2.1 SU15-0 

24 

25 If THE PROGRAH IS RUN WITH SUIS-O. NO OPERATOR ACTION IS REQUIRED TO 

26 CONTINUE TESTING 
27 

20 
29 

SO 6.2.2 SW15-1 

SI 

S2 If THE PROGRMI IS RUN UITH SW15-1. TO CONTINUE TESTING AFTER THE 

SS PRQGMH HAS HALTED. PRESS THE PRKESSOR CONSOLE CONTINUE SWITCH 

84 

35 

36 

S7 6.2.3 ILLEGAL INTERRUPTS 

sa 

S9 IF AN INTERRUPT OCCURS TO A VECTOR ADDRESS NOT SELECTED DURING PROGRAM 

40 INITIALIZATION. THE PROGRAM UILL HALT IN THE TRAPCATCHER. THE ADDRESS 

41 AT UHICH THE PROGRAH HALTS IS 2 GREATER THAN THE ADDRESS TO UHICH THE 

42 INTERRUPT OCCUREO. THE PROGRAM MUST BE RESTARTED AT 200 TO RECOVER 

43 FROM THIS ERROR. 
44 

45 
46 

47 6.3 SCOPE LOOPING 

48 

49 

50 
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1 PAGE 12 

2 

S 

4 6.3.1 TO SCOPE ON A SPECIFIC TEST. SET SU14-1 AND SU13-1. THIS UILL 

5 CAUSE THE PROGRAH TO CONTINUOUSLY LOOP ON THE SAME TEST. AND UILL 

6 CAUSE ALL »ROfi TYPEOUTS TO BE INHIBITED 
7 

S 
9 

10 6.3.2 TO SCOPE ON A SPECIFIC VALUE OF A PATAHETER UITHIN A TEST. SET 

11 SU09-1 TO FREEZE THE DATA. (SEE LISTING FOR THOSE TESTS THAT 

12 INCORPORATE THIS FEATURE) 
13 

14 
15 

16 6.3.3 PROGRAM START TO SCOPE LOOP ON SELECTED TEST 

17 

la PERFORH SECTION 4.3.4 UITH SU14-1 

19 

20 

21 

22 7.0 RESTRICTIONS 

23 

24 

25 

26 7.1 STARTING 

27 

28 THE DHll TEST CARD MUST BE INSTALLED 

29 

30 

31 

32 7.2 RUNNING 

33 

34 NONE 

35 

36 

37 
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SEQ 14 



30 




3t 




40 




** 




•« 


A 1 even iTTfVM TTMC 

0 . 1 t AcLU 1 Ivvi \ int. 








inc. 1 xnc run uric, rnss 




I TrCUU 1 Ur L^Unu 


Ail 


9CLUH 


# f 




*0 


1 xnc 


AQ 




3U 




<1 




52 


POP- 11/05. XO 


53 




54 


POP- 11/20 


55 




56 


POP -11/40 


57 




58 


POP -11/45 



« PROGRAM (END OF TYPEOUT OF CZOHG-C TO END 
IS GIVEN FOR VARIOUS PROCESSORS IN THE TABLE 
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21 
22 
23 
24 
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30 
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35 
36 
37 
36 
39 
40 
41 
42 
43 
44 
45 
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9.0 PROGRAM DESCRIPTION 

THIS PROGRAM CONSISTS OF 2 TESTS. THE FIRST TEST RUNS ALL 16 LINES AT 
4800 BAUD WITH THE RECEIVER OPERATING IN INTERRUPT MODE. THE 
TRANSMITTER INTERRUPT IS NOT ENABLED. BUT A BACKGROUND ROUTINE IS 
EXECUTED THAT FIRST WAITS FOR ALL TRANSMITTER BAR BITS TO CLEAR. ANO 
THEN WAITS FOR THE SILO TO BE EMPTIED BY THE RECEIVER INTERRUPT 
SERVICE ROUTINE. WHEN BOTH OF THESE HAVE OCCURED. THE TEST HAS BEEN 
COMPLETED. AND IS RESTARTED IF ITERATIONS HAVE NOT BEEN INHIBITED. 

THE RECEIVER INTERRUPT SERVICE ROUTINE FOR THIS TEST FIRST CHECKS TO 
SEE THAT CHARACTER AVAILABLE WAS SET ANO THAT SILO OVERRUN UAS NOT 
SET. IT THEN READS THE RECEIVED CHARACTER FROM THE SILO. EXTRACTS THE 
LINE NUMBER FROM THE DATA READ. ANO COMPARES THE RECEIVED DATA WORD 
(16 BITS) TO AN EXPECTED RECEIVED CHARACTER WORD FOR THE LINE DECODED. 
THE EXPECTED RECEIVED CHARACTER FOR THAT LINE IS THEN UPDATED. ANO THE 
ROUTINE THEN RETURNS BACK TO THE TRANSMITTER BACKGROUND ROUTINE 

THE SECOND TEST OPERATES WITH THE TRANSMITTER AND RECEIVER BOTH IN 
INTERRUPT MODE. BUT THE SILO ALARM LEVEL IS SET TO 63 (DECIMAL) 
CHARACTERS. ANO A CHARACTER AVAILABLE INTERRUPT SHOULD NOT OCCUR. 

THE RECEIVER IS SERVICED ON A PER CHARACTER BASIS Br CONTINUOUSLY 
TRYING TO READ CHARACTERS FROM THE NEXT RECEIVED CHARACTER REGISTER. 
WHEN THE VALID DATA BIT OF THE NEXT RECEIVED CHARACTER REGISTER IS 
SET. THE ROUTINE PROCEEDS TO CHECK THE CHARACTER AS IN THE PREVIOUS 
TEST. WHEN THE EXPECTED RECEIVED CHARACTER INCREMENTS TO 0 10 
(DECIMAL) TIMES. AN END OF TRANSMIT FLAG IS SET. IF THIS FLAG IS NOT 
SET. THE TRANSMITTER IS RESTARTED FOR THE LINE WHOSE NEXT EXPECTED 
RECEIVED CHARACTER INCREMENTED TO 0. WHEN THE END OF TRANSMIT FLAG IS 
SET. NO LINES ARE RESTARTED, THE SILO IS EMPTIED OF ALL REMAINING 
CHARACTERS. ANO THE TEST IS RESTARTED IF ITERATIONS ARE NOT INHIBITED. 



10.0 LISTING 
t 
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1 
2 
3 
4 

5 
6 

7 

104 
119 
131 
148 
158 
167 
303 
339 
373 
5?0 
563 
595 
607 
652 
664 
691 
712 
743 
744 
745 



: DHMAC-A - OHll MACRO LIBRARY 

I COPYRIGHT 1985. DIGITAL EQUIPMENT CORP. 



MAYNARD, MASS. 01754 



.LIST 
.NLIST 



ME 

MC.MD.CND 



CMS REPLACE^ENT HISTORY 



746 


: •9 


SKONETSKI 


26 -APR -1985 


16:23:04 


747 


; •8 


SKONETSKI 


22 -APR -1985 


16:48:03 


748 


: •7 


SKONETSKI 


22- APR- 1985 


16:26:04 


TRAPS. " 










749 


: •6 


SKONETSKI 


22 -APR -1985 


14:22:35 


750 


! •5 


SKONETSKI 


22 -APR -1985 


08:28:54 


CLEAN END Of PASS 










MESSAGE. 










751 


! •4 


SKONETSKI 


18-APR-1985 


14:20:15 


752 


! •3 


SKONETSKI 


12- APR- 1985 


10:34:52 


753 


: •2 


SKONETSKI 


11- APR- 1985 


16:00:24 


TCH ««G1STER' 










754 


: *1 


SKONETSKI 


ll.APR-1985 


15:49:05 



'TYPO ERROR IN VECTOR CHANGE CODE SOURCC FIXED' 



'FIXED BRANCH ERROR IN END OF PASS ROUTINE - 

-FIXED BUG (AN OCTASC MACRO CALL WAS WRONG) AND ADDED A 



"ADDED SOFTWARE SWITCH REG SUPPORT. BUT UNTESTED - 



"LIBRARY FOR OHll DIAGNOSTICS' 



SEO 17 
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2 
3 

5 000000 



.LIST ME 
.NLIST MCMD.CND 

.HEADER t/ 1972. 1985/. t/OHll f^INGLE LINE PARITY CHECK £ MULTI-LINE DATA TEST/.t/QZDHG-CO/ 

I STARTING PROCEDURE 
LOAD PROGRAM 
LOAD ADDRESS 000200 
PRESS START 

PROGRAM giLL TYPE OHll SINGLE LINE PARITY CHECK 6 MULTI-LINE DATA TEST 
PROGRAM UILL TYPE "VECTOR ADDRESS-" 
TYPE IN THE ADDRESS OF THE RECEIVER INTERRUPT VECTOR 
FOR THE DHll TO BE TESTED. FOLLOUED BY <CARRIAGE RETURN> 
iPRCGRAM UILL TYPi: "CONTROL REGISTER ADDRESS-" 
sTYPE IN THE ADDRESS OF THE SYSTEM CONTROL REGISTER 
FOR THE DHll TO BE TESTED. FOLLOUED BY <CARRIAGE RETURN> ; 3 

PROGRAM WILL TYPE "R" TO INDICATE THAT TESTING HAS STARTED 
AT THE END OF A PASS. PROGRAM UILL TYPE " CZOHG-CO " 
AND THEN RESUM TESTING 



000000 
6 OCOOOO 



.TITLE CZDHG-CO 
.ENABLE ABS 
.NLIST MC.MD.CND 
.LIST ME 
.SYMBOLS 

sSUITCH REGISTER OPTIONS 



100000 
040000 
020000 
010000 
004000 
C02000 
001000 
000400 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



SU15< 
SU14> 
SU13< 
SU12' 
SUll' 
SU10< 
SU09- 
SU08> 
SU06< 
SU05> 
SU04< 
SU03< 
SU02< 
SUOl' 
SUOO' 



100000 

40000 

'20000 

10000 

4000 

2000 

1000 

'400 

100 

40 

20 

10 

<4 

2 

1 



:«1.HALT ON ERROR 
;-l,LOOP ON CURRENT TEST 
;-l, INHIBIT ERROR TYPEOUT 

i-1. INHIBIT ITERATIONS 
i-1. ESCAPE TO NEXT TEST ON ERROR 
LOOP UITH CURRENT DATA 



J RESTART PROGRAM AT SELECTED TEST 
iRESELECT VECTOR AND CONTROL REGISTER 
I ADDRESS AFTER PROGRAM RESTART 
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0 

{REGISTER DEFINITIONS 



000000 RO-KO {GENERAL REGISTER 

000001 Rl-«1 (GENERAL REGISTER 

000002 R2-tf2 (GENERAL REGISTER 

000003 R3-tf3 (GENERAL REGISTER 

000004 R4-i(4 (GENERAL REGISTER 

000005 RS-tfS (GENERAL REGISTER 

000006 SP-tf6 (PROCESSOR STACK POINTER 

000007 PC*tf7 (PROGRAM COUNTER 

(LOCATION EQUIVALENCIES 

{SUR-177570 (CONSOLE SWITCH REGISTER 
{LIGHTS-177570 :PDP-ll/45 DISPLAY REGISTER 
177776 PS-177776 (PROCESSOR STATUS UORD 

013752 STACK-ENDC0D«200 (START OF PROCESSOR STACK 

(INSTRUCTION DEFINITIONS 

005746 PUSHlSP-5746 (DECREMENT PROCESSOR STACK 1 UORD 

005726 POPlSP-5726 (INCREMENT PROCESSOR STACK 1 WORD 

010046 PUSHRO-10046 tSAVE RO ON STACK 

012600 POPRO- 12600 (RESTORE RO FROM STACK 

024646 PUSH2SP-24646 (DECREMENT STACK TWICE 

022626 P0P2SP-22626 (INCREMENT STACK TWICE 

[macro HLT )A 
EMT )A 
.ENOM HLT 

f 

100000 BIT15-100000 

040000 BIT14-40000 

020000 BIT13-20000 

010000 BIT12- 10000 

00^*000 BITll-4000 

002000 BITlO-2000 

001000 BIT09-1000 

000400 BIT08-400 

000200 BIT07-200 

000100 BIT06-100 

000040 BITOS-40 

000020 BIT04-20 

000010 BIT03-10 

000004 BIT02-4 

000002 BITOl-2 

000001 BITOO-1 

1 000000 .CATCH 



CZOHG-CO 
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000000 
000200 



tTRAPCATCAER F( 

.-0 

.REPT 200 







.♦2 






HALT 






.ENOR 


000000 


000002 


.♦2 


000002 


000000 


HALT 


000004 


000006 


.♦2 


000006 


000000 


HALT 


000010 


000012 


.♦2 


000012 


000000 


HALT 


000014 


000016 


.♦2 


000016 


000000 


HALT 


000020 


000022 


.*2 


000022 


000000 


HALT 


000024 


000026 


.♦2 


000026 


000000 


HALT 


000030 


000032 


.♦2 


000032 


000000 


HALT 


000034 


000036 


.*2 


000036 


000000 


HALT 


000040 


000042 


.♦2 


000042 


000000 


HALT 


000044 


000046 


.♦2 


000046 


000000 


HALT 


000050 


000052 


.♦2 


000052 


000000 


HALT 


000054 


000056 


.♦2 


000056 


000000 


HALT 


000060 


000062 


.♦2 


000062 


000000 


HALT 


000064 


000066 


.♦2 


000066 


000000 


HALT 


000070 


000072 


.♦2 


000072 


000000 


HALT 


000074 


000076 


.♦2 


000076 


000000 


HALT 


000100 


000102 


.*2 


000102 


000000 


HALT 


000104 


000106 


.♦2 


000106 


000000 


HALT 


000110 


000112 


.*2 


000112 


000000 


HALT 


000114 


000116 


.♦2 


000116 


000000 


HALT 


000120 


000122 


.♦2 


000122 


000000 


HALT 


000124 


000126 


.«2 


000126 


000000 


HALT 


000130 


000132 


.♦2 


0001S2 


000000 


HALT 


000134 


000136 


.♦2 


000136 


000000 


HALT 


000140 


000142 


.♦2 


000142 


000000 


HALT 


000144 


000146 


.•2 



ILLEGAL INTERRUPTS 



jUNEXPECTED TRAP TO THIS LOCATION 
i EXAMINE STACK TO FIND CAUSE 

jUNEXPECTED TRAP TO THIS LOCATION 
: EXAMINE STACK TO FIND CAUSE 
s UNEXPECTED TRAP TO THIS LOCATION 
: EXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
J EXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
J EXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
J EXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
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< *c 




AAAAAA 


MAI T 

nnL. 1 




WWX0O 


• *C 




AAAAAA 


MAI T 




AAAI 79 


• *c 


MAI 79 
WV* » s 


AAAAAA 
WWW 


HAI T 




AAAI 7ft 






AAAAAA 
WWW 


MAI T 


AAA9AA 


AAA9A9 






AAAAAA 


MAI T 


AAA9AA 


AAA9A* 






AAAAAA 
WWW 


MAI T 




AAA9I9 




AAA9I9 


AAAOAO 


HALT 


0009t4 


A0A9lft 


• *s 


0009 1& 
wvsxo 


OOftOftO 
WWW 


HALT 


000990 


000999 


*9 
ff *s 


000999 


000000 
wwvw 


HALT 


00099A 


00099ft 


a9 
• *s 


00099ft 
wvssv 


000000 


HALT 


0009 so 


0009 S9 
WVS ws 


*9 


000919 


000000 
www 


HALT 


0009 S4 


0009 Sft 

WVSwV 


*2 

• *S 


0009 M 


000000 
www 


HALT 


0009 AO 


000942 
wvs^s 


. *2 


000949 


000000 
www 


HALT 


0009A4 


0009Aft 

wvs^v 


. *2 


0009M 


000000 

www 


HALT 


0009 so 


0009 S2 

WVS 9S 


. *2 


0009 S9 


000000 

WWW 


HALT 


0009 S4 


00099ft 
wvs^v 


*9 

« *S 


0009M 


000000 

WWW 


HALT 


0009A0 

WVS wV 


0009ft9 

WVSVS 


«9 

• ▼S 


0009&9 


000000 

WWW 


HALT 


0009M 


0002ftft 

WVS vv 


. *2 


0009M 

WWW 


000000 

www 


HALT 


000970 

WVS r V 


000272 

WVK • S 


*9 

• *S 


000972 

WVS fm 


000000 

www 


HALT 


000974 

WVS »~ 


00027ft 

WVK rW 


. ^2 


00027ft 

W V» r V 


000000 

www 


HALT 


ooosoo 

WV wW 


000S02 


. *2 


000S02 

wv<# vs 


000000 

www 


HALT 


000S04 


OOOSOft 

WV wVw 


«9 


WVwVW 


AAAAAA 
www 


HALT 


WW* AV 


000S19 

WVw AS 


a9 

• ~ s 


00OS12 


000000 


HALT 


00OS14 


000316 


.*2 


OOOSU 


000000 


HALT 


00OS20 


000322 


.*2 


000S22 


000000 


HALT 


000S24 


000S26 


.*2 


000S26 


000000 


HALT 



EXAMINE STACK TO TINO CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO TINO CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO TINO CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO TINO CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FZNO CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FZNO CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TC THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
{UNEXPECTED TRAP TO THIS LOCATION 
I EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
[UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
[EXAMINE STACK TO FIND CAUSE 
[UNEXPECTED TRAP TO THIS LOCATION 
[EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
[EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO riNO CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FZNO CAUSE 
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000000 
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000000 
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000000 
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000000 
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HALT 
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*9 
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000000 
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HALT 


000440 


000449 


«9 
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000000 

WW WW WW 


HALT 


000444 


000446 


♦9 


w 


000000 

WWWW^rtr 


HALT 


0004 so 


000459 


«9 


0004 V 


000000 
wwwwww 


HALT 


0004 S4 


000456 

WW^^*^W 


«9 


0004 S6 


000000 

WWWV^rtr 


HALT 


0004 &0 


000469 


♦9 


0004AP 


000000 

wwwwww 


HALT 
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000466 

WW*^^ WW 


«9 
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000000 

wwwwww 


HALT 
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000000 

wwwwww 


HALT 
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000000 


HALT 


000500 
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000000 


HALT 


000504 


000506 


.♦2 


000506 


000000 


HALT 


000510 


000512 


.*2 



L 



;UNEXPECTEO TRAP TO THIS LOCATION 
: EXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
iEXAniNE STACK TO FIND CAUSE 
;UNEXPECTED TRAP TO THIS LOCATION 
:EXAniNE STACK TO FIND CAUSE 
} UNEXPECTED Ti^AP TO THIS LOCATION 
iEXAniNE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
iEXAniNE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
J EXAMINE STACK TO FIND CAUSE 
.•UNEXPECTED TRAP TO THIS LOCATION 
jEXAniNE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
.•EXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
jEXAMZNE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
J EXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
J EXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
J EXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
J EXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
{EXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
t EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
(EXAMINE STACK TO FIND CAUSE 
(UNEXPECTED TRAP TO THIS LOCATION 
jEXAMINE STACK TO FIND CAUSE 
jUNEXPECTEO TRAP TO THIS LOCATION 



CZOHG-CO MACRO V04.00 2< -JUN-85 13:01:46 PAGE 17-3 



000512 


000000 


HALT 


000514 


000516 


.♦2 


000516 


000000 


HALT 


000520 


000522 


.♦2 


000522 


000000 


HALT 


000524 


000526 


.♦2 


000526 


000000 


HALT 


000530 


000532 


,♦2 


000532 


000000 


HALT 


000534 


000536 


.♦2 


000536 


000000 


HALT 


000540 


000542 


.♦2 


000542 


000000 


HALT 


000544 


000546 


.*2 


000546 


000000 


HALT 


000550 


000552 


.«2 


000552 


000000 


HALT 


000554 


000556 


.«2 


000556 


000000 


HALT 


000560 


000562 


.♦2 


000562 


000000 


HALT 


000564 


000566 


.«2 


000566 


000000 


HALT 


000570 


000572 


.♦2 


000572 


000000 


HALT 


000574 


000S76 


.«2 


000576 


000000 


HALT 


000600 


000602 


.♦2 


000602 


000000 


HALT 


000604 


000606 


.«2 


000606 


000000 


HALT 


000610 


000612 


.♦2 


000612 


000000 


HALT 


000614 


000616 


.«2 


000616 


000000 


HALT 


000620 


000622 


.«2 


000622 


000000 


HALT 


000624 


000626 


.*2 


000626 


000000 


HALT 


000630 


000632 


.♦2 


000632 


000000 


HALT 


000634 


000636 


.«2 


000636 


000000 


HALT 


000640 


000642 


.♦2 


000642 


000000 


HALT 


000644 


000646 


.«2 


000646 


000000 


HALT 


000650 


000652 


.«2 


000652 


000000 


HALT 


000654 


000656 


.*2 


000656 


000000 


HALT 


000660 


000662 


.♦2 


000662 


000000 


HALT 


000664 


000666 


.*2 


000666 


000000 


HALT 


000670 


000672 


.♦2 


000672 


000000 


HALT 



L 



EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
examine: STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAHINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAHINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAHINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS Lf^CATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
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000000 

WW WW WW 


HALT 


000730 


000/32 




000732 


000000 


HALT 


000734 


000736 


. +2 


000736 


000000 


HALT 


000740 


000742 


. *2 


000742 


000000 


HALT 


000744 


000746 

WV ' ~w 


♦ 2 


000746 


000000 


HALT 


000750 


000752 


. *2 


000752 


000000 


HALT 


000754 


000756 


.♦2 


000756 


000000 


HALT 


000760 


000762 


.♦2 


000762 


000000 


HALT 


000764 


000766 


.«2 


000766 


000000 


HALT 


000770 


000772 


.♦2 


000772 


000000 


HALT 


000774 


000776 


.♦2 


000776 


000000 


HALT 


1 001000 




.SETVEC 



L 



UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS I OCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
UNEXPECTED TRAP TO THIS LOCATION 
EXAMINE STACK TO FIND CAUSE 
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0002:00 
000200 000167 000600 



'200 



; STANDARD INTERRUPT VECTORS 

jnP START :G0 TO START OF PROGRAM 



1 000204 

000204 
000204 
000204 
000204 
000204 
000204 
000204 
000204 
000204 



2 
5 
4 

S 

6 000204 



104400 
000001 

104401 
000002 

104402 
OOOOOS 

10440S 
000004 

104404 
000005 

104405 
000006 

104406 
000007 

104407 
000010 

104410 
000011 



.TRPDEF 

> DEFINITIONS FOR TRAP SUBROUTINE CALLS 
{POINTERS TO SUBROUTINES CAN BE FOUND STARTING 
sAT LOCATION "TRPTAB* 

TRPDEF SCOPE. t/SCOPE LOOP AW ITERATION HANDLER/ 

SCOPE-TRAP «Y i SCOPE LOOP AND ITERATION HANDLER 

Y"Y*1 

TRPDEF TYPE.t/TELETYPE OUTPUT ROUTINE/ 

TYPE-TRAP»Y jTELETYPE OUTPUT ROUTINE 

Y"Y*1 

TRPDEF OCTASC.t/OCTAL TO ASCII CONVERSION/ 

OCTASC-TRAP«Y tOCTAL TO ASCII CONVERSION 

Y-Y»l 

TRPDEF INSTR.t/INPUT ASCII STRING/ 

INSTR-TRAP«Y iINPUT ASCII STRING 

Y-Y*l 

TRPDEF INSTER.t/STRING INPUT ERROR/ 

INSTER-TRAP«Y iSTRING INPUT ERROR 

Y-Y*l 

TRPDEF PARAH.t/CONVERT STRING TO OCTAL. CHECK LIMITS/ 

PARAn-TRAP*Y :CONVERT STRING TO OCTAL. CHECK LIMITS 

Y-Y»l 

TRPDEF SAVOSP.t/SAVE RO-RS. PC/ 

SAV05P"TRAP*Y (SAVE R0-R5. PC 

TRPDEF RES05.t/REST0RE RO-RS/ 

RESOS-TRAP*Y (RESTORE RO-RS 

TRPOEF SCOPEl.t /CHECK FOR FREEZE ON CURRENT DATA/ 

SCOPEl-TRAP'Y {CHECK FOR FREEZE ON CURRENT DATA 

Y-Y*l 

.MACRO COOEMl 

NOV DHSSR.DHSLR tSET UP ADDRESS OF SILO 

INC DHSLR > STATUS REGISTER HIGH BYTE 

.ENDM CODEMl 

. START OHRVEC .3.4. OHSCR . 0 . 177776 . 7 . 10 ... 1 
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SEQ 25 



001000 



1000 



PftOGRMI INITIALIZATION 
LOCK OUT INTERRUPTS 
SET UP PROCESSOR STACK 
SET UP POUER FAIL VECTOR 
i CLEAR PROGRAn FLAGS AND COUNTS 
jTYPE TITLE MESSAGE 











.IIF NB 


<> , 


{DETERMINE MEHORr 


SIZE 










.IIF NB 


<> . 


iSET UP TRACE TRAP 


RETURN 


')01000 


177570 






SWR: 


.WORD 


177570 


i SWITCH DHSCR ADDRESS 


001002 


177570 






LIGHTS: 


.UORO 


177570 


1 LIGHTS 


001004 


012767 


000S40 


176764 


START: 


MOV 


•340. PS 


(LOCK OUT INTERRUPTS 


001012 


012706 


013752 






MOV 


•STACK. SP 


tSET UP PROCESSOR STACK 


001016 


012702 


000024 






MOV 


•24. R2 


t POINT TO VECTOR AREA 


001022 


012722 


012512 






MOV 


#PFAIL.(R2)* 


iSET UP POWER FAIL TRAP 


001026 


012722 


000340 






MOV 


•340. (R2)« 


1 SERVICE AT LEVEL 7 


001032 


012722 


010704 






MOV 


•ERRORS. (R2)« 


(ERROR HANDLER 


0010S6 


012722 


000340 






MOV 


•340. (R2)« 


{SERVICE AT LEVEL 7 


001042 


012722 


011116 






MOV 


•TRPSRV. (R2}t 


{GENERAL HANDLER DISPATCH SERVICE 


001046 


012712 


000340 






MOV 


•340. (R2) 


{SERVICE AT LEVEL 7 


0010S2 


005067 


010762 






CLR 


STFLG 


1 CLEAR TEST START FLAG 


0010S6 


005067 


010716 






CLR 


PASCNT 


1 CLEAR PASS COUNT 


001062 


005067 


010714 






CLR 


ERRCNT 


t CLEAR ERROR COUNT 


001066 


005067 


010704 






CLR 


ERRFLG 


1 CLEAR ERROR FLAG 


001072 


005067 


010700 






aR 


ERRFLG 


1 CLEAR LAST ERROR PC 


001076 


016746 


176702 






MOV 


4, -(SP) 


i PUSH TRAP VECTOR 


001102 


016746 


176700 






MOV 


6. -(SP) 




001106 


012767 


001122 


176670 




MOV 


•It. 4 


1 SET UP TRAP VECTOR 


001114 


005777 


177660 






TST 


OSUR 


t TEST SWITCH REGISTER ADDRESS 


001120 


000405 








BR 


2» 


1 IF SUCCESSFUL LEAVF IT ALQNF 


001122 








1>: 






001122 


012767 


000176 


177650 




MOV 


•176. syR 


t POINT TO SOFT SWITCH DHSCR 


OOllSO 


005067 


177646 






CLR 


LIGHTS 


t 0 MEANS WE ARE NOT GOING TO USE 


001154 








2>: 






0011S4 


005726 








TST 


(SP). 


t CLEAN UP STACK 


0011S6 


005726 








TST 


(SP). 




001140 


012667 


176642 






MOV 


(SP)., 6 




001144 


012667 


176634 






MOV 


(SP).. 4 




001150 


104401 


012662 






TYPE 


.MTITLE 


iTYPE TITLE MESSAGE 


001154 


005767 


010656 






TST 


INIFL6 


tCHECK INITIALIZATION FLAG 










.IF NB 


<OHRVEC> 




001160 


001001 








6NE 


VECl 


lIF NOT 0. CHECK SWITCHES 
















iFOR REINITIALIZATION 










.IFF 
















BNE 


BEGIN 


iIF NOT 0. START TEST 










.ENDC 
















.IF NB 


<> 














SIZE: 


CLR 


RO 














MOV 


•21. M4 


iSET UP TIME OUT RETURN 










1»: 


TST 


(RO). 


tWILL TRAP WHEN NO MEMORY 












BR 


It 


{LOCATION RESPONDED. CONTINUE 










21: 


MOV 


RO.HCORE 


iRO CONTAINS ADDRESS OF 












SUB 


•2.HC0RE 


iNON EXISTANT MEMORY 












MOV 


•6 .0^4 


iRFSTORE TRAPCATCHER 



4 
4 
4 



7 
7 
7 
7 
7 
7 

a 



4 
4 
4 
4 
4 
4 
4 

5 
4 
4 
4 
4 



I 9 
I 9 
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001162 


000404 




001164 


032777 


000001 177606 


001172 


001445 




001174 






001174 


012701 


000300 


001200 


012702 


000302 


C01204 


012703 


000004 


001210 


010211 




001212 


005012 




001214 


060301 




001210 


Ait AVA'^ 

060S02 




001220 


020127 


001000 


001224 


001371 




001226 


104403 




0012S0 


012755 




0012S2 


104405 




0012S4 


000300 




001236 


000770 




001240 


011766 




001242 


003 




001243 


004 




001244 


104403 




001246 


012777 




001250 


104405 




001252 


000000 




001254 


177776 




001256 


011744 




001260 


007 




001261 


010 





001262 

001262 016767 010474 010474 

001270 005267 010470 

001274 005767 010536 

001300 001002 

001302 005167 010530 



.ElOC 



.If NB 


<> 




TRACER: 


NOV 


•11,8*10 




SXT 


RO 




NOV 


#«TT.TRTRET 




BR 


2» 


11: 


NOV 


•RTI.TRTRET 




NOV 


•12.M10 




NOV 


*TRTRET.8*16 


.ENOC 




.IF m 


<OHRVEC> 


.IF B 


<> 






BR 


VEC2 


.IFF 








TST 


INIFL6 




6EQ 


VEC2 


.ENOC 






VECl: 


BIT 


4SU00.8SUR 




BEQ 


6E6IN 


VEC2: 








NOV 


•300. Rl 




NOV 


•302. R2 




NOV 


•4.R3 


11: 


NOV 


R2.CR1) 




aR 


(R2) 




ADD 


R3.R1 




ADD 


R3.R2 




CHP 


Rl.^1000 




BNE 


1* 




INSTR 






NVECTOR 






PARAN 






300 






770 






OHRVEC 




.BYTE 


3 




•BYTE 








INSTR 






NRE6A0 






PARAN 






0 






177776 






DHSCR 




.BYTE 


7 




•BYTE 


10 




.ENOC 






.IF NB 


<1> 






COOENl 






NOV 


OHSSR.OHSLR 




me 


DHSLR 


.ENDC 








TST 


OUFLG 




BNE 


BEGIN 




CON 


INIFLG 



iPRQQRAN START 

I CHECK FOR raOGRAH START 



L 



SEQ 26 



I SET UP ILLEGAL INSTRUCTION TRAP RETURN 

tOO 11/40. 11/45 INSTRUCTION 

i 11/40. 4S RTT RETURN FRON TRACE TRAP 

J 1105. 10.20 RTI RETURN FROM TRACE TRAP 

iRESTROE TRAPCATDCR 

I SET UP TRACE TRAP VECTOR 



I IF INITIALIZE FLAG-0 

iGET VECTOR AND CSR ADDRESS 

I IF SUOO-1. GET NEU VECTOR i 4 

(AND CSR 

I 4 
I 4 



(RESTORE TRAPCATCHER 

I IN FLOATING VECTOR AREA 



i INPUT ADDRESS OF DEVICE VECTOR 
iNESSAGE -VECTOR ADDRESS-' 
•CONVERT STRING TO OCTAL 
iLOU LIMIT 

iHIGH LmiT I 
iLOCATIONS TO BE FILLED 
iNUNBER OF LOCATIONS 
iLSB NASK 

I INPUT ADDRESS OF DEVICE CSR 
iNESSAGE "CONTROL REGISTER ADORESS- 
t CONVERT STRING TO OCTAL 
I LOU LIHIT 
iHIGH LINIT 

iLKATIONS TO BE FILLED 
iNUNBER OF LOCATIONS 
iLSB HASK 



I SET UP ADDRESS OF SILO 
I STATUS REGISTER HIGH BYTE 

ilF INITIALIZATION FLAG 
lis aEAREO 
iSET IT 

I 3 

AT SELECTED ADDRESS 
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001306 


012767 


000340 


176462 


BEGIN: 


MOV 


♦340. PS 


001314 


012706 


013752 






MOV 


♦STACK. SP 


001320 


032777 


000002 


17V452 




BIT 


♦SWOl.SSUR 


001326 


001410 








BEQ 


1) 


001330 


104403 








INSTR 




001332 


013166 








NTSTPC 




001334 


104405 








PARAM 




001336 


000000 








0 




001340 


017500 








17500 




001342 


012004 








RETRN 




001344 


001 






.BYTE 


1 




001345 


001 






• BYTE 


1 




001346 


000410 








BR 


21 


001350 


012767 


001400 


010426 


1$: 


MOV 


♦Tl.RETMN 


001356 


005767 


010456 






TST 


STFLG 


001362 


001004 








BNE 


31 


001364 


005167 


010450 






COM 


STFLG 


001370 


104401 


013162 




2): 


TYPE 


.MR 


001374 


000177 


010404 




31: 


JMP 


8RETRN 



iLOCK OUT INTERRUPTS 
I SET UP PROCESSOR STACK 
I IF SWOl-1 

»GET PC FOR PROGRAM START 
iGET PC 

jMESSAGE "TEST PC" 

» CONVERT STRING TO OCTAL 



jNORMAL START. TEST 1 

I IF LOOPING, BYPASS TYPEOUT 



;TYPE "R" TO INDICATE START 
s START TESTING 
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SEQ 28 



4 

5 
7 
8 
9 
10 
11 
12 
13 



000000 
000000 
000001 
000001 
000020 



001400 



001400 
0C1400 
001406 
001414 



012767 
012767 
012767 



000340 
000010 
001540 



176370 
010376 
010364 



001422 012767 001470 010360 



001430 
001436 
001442 



000002 
012777 
012703 
012705 



004000 
000000 
130000 



010306 



LINE-0 
XLINE-l INE 
BITX-1 
XBIT-BITX 
.REPT 20 

POPOVER \l:ne,\bitx 

.NLIbT 

LINE-LINE*! 

BITX-BITX*BITX 

.LIST 

.ENOR 

POPOVER \LINE.\BITX 



iRECEIVER PARITY LOGIC TEST ON LINE 0. 

s TRANSMIT ONE CHARACTER TO THE RECEIVER 

J WITH 000 PARITY SET. BREAK SET.HOX SET. 

iTHE RECEIVER UILL RECEIVE AN ALL O'S CHARACTER 

sUITH EVEN PAiRITY AND THEFIiEBY 

> CAUSE A PARITY ERROR AND OVERRUN 

:CHARACTER LENGTH: 8 BITS 

{LINE SPEED: 9600 BAUD 



TS 
Tl: 



\XN,10 
MOV 
MOV 
MOV 
.IF NB <ll> 
MOV 

.ENDC 
XN>XN*1 

MOV 
MOV 
MOV 



.4$.1» 
«340,PS 
♦lO.ICOUNT 
«4 I. ESCAPE 

♦ll.FREEZl 



i DISABLE ALL INTERRUPTS 
tSET UP FOR 10 ITERATIONS 
:SET UP TO ESCAPE TO NEXT TEST 

iSET UP TO LOOP WITH DATA 



«BIT11.80HSCR :MASTER CLEAR INTERFACE 
#0.R3 tSET UP LINE ♦ 
«0*400*130000,RS 



;SET EXPECTED LINE NUMBER 
: VALID DATA FLAG. 
{PARITY ERROR. DATA OVERRUN. 
{AND EXPECTED DATA 



001446 


012767 


000377 


010372 




MOV 


♦377.TDATA 


{ACTUAL DATA TO BE TRANSMITTED 


001454 


012777 


000000 


010262 




MOV 


«O.SOHSCR 


(SELECT LINE 0 


001462 


012777 


073563 


010260 




MOV 


«7S56S.SDHLPR 


{SELECT 8 BITS/CHAR. ODD PARITY 
{9600 BAUD SPEED FOR LINE 0 


001470 


012777 


177777 


010256 


11: 


MOV 


•-l.SDHSC 


{TRANSMIT 1 CHARACTER 


001476 


012777 


012046 


010246 




MOV 


•TDATA.8DKeA 


{ADDRESS OF TRANSMITTED DATA 


001504 


012777 


000001 


010246 




MOV 


•1.80H8CR 


tSET BREAK FOR LINE 0. 


001512 


012777 


000001 


010236 




MOV 


•l.SDHeAR 


{START TRANSMITTER 


001520 


105777 


010220 




2t: 


TSTB 


80HSCR {WAIT 


FOR CHARACTER TO BE RECEIVED 


001524 


100375 








BPL 


21 




001526 


017701 


010214 






MOV 


80HNRC.R1 


!gET RECEIVED CHARACTER 


001532 


020501 








CMP 


RS.Rl {COMPARE EXPECTED AND RECEIVED DATA 


001534 


001401 








BEQ 


.♦4 




001536 










HLT 


3 iDATA ERROR 


001536 


104003 








EMT 


3 




001540 


104^00 






41: 


SCOPE 


{CHECK FOR ITERATIONS, LOOP 




OOC^Ol 






LINE 


-LINE*1 








OOOOOi; 






BITX 


•BITX*BITX 







001542 



POPOVER \LINE,\BITX 



{RECEIVER PARITY LOGIC TEST ON LINE 1. 



-co 
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SEQ 29 



I TRANSMIT ONE CHARACTER TO THE RECEIVER 

iUITH ODD PARITY SET. BREAK SET.HOX SET. 

iTHE RECEIVER WILL RECEIVE AN ALL O'S CHARACTER 

iUITH EVEN Pr.RITY AND THEREBY 

iCAUSE A PARITY ERROR AUD OVERRUN 

{CHARACTER LENGTH: 8 BITS 

(LINE SPEED: 9600 BAUD 



001542 TS \XN,10 

001542 012767 000340 176226 T2: MOV 

001550 012767 000010 010234 MOV 

001556 012767 001702 010222 MOV 

.IF NB <1«> 

010216 MOV 

.E>toc 

000003 XN-XN*1 

001572 012777 004000 010144 MOV 

001600 012703 000001 MOV 

001604 012705 130400 MOV 



001564 012767 001632 



.4».1» 
♦340. PS 
«10.IC0UNT 
«4*. ESCAPE 

«1«,FREEZ1 



I DISABLE ALL INTERRUPTS 
J SET UP FOR 10 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 

(SET UP TO LOOP UITH DATA 



«8IT11.8DHSCR (MASTER CLEAR INTERFACE 
«1.R3 I SET UP LINE • 
•1*400*130000. RS 



(SET EXPECTED LINE NUMBER 
s VALID DATA FLAG. 
sPARITY ERROR. DATA OVERRUN. 
>AM) EXPECTED DATA 



001610 


012767 


000377 


010230 




MOV 


♦377.TDATA 


(ACTUAL DATA TO BE TRANSMITTED 


0C1616 


012777 


000001 


010120 




MOV 


•l.SOHSCR 


(SELECT LINE 1 


001624 


012777 


073563 


010116 




nov 


•73563. OOHLPR 


(SELECT 8 BITS/CHAR. ODD PARITY 
(9600 BAUD SPEED FOR LINE 1 


001632 


012777 


177777 


010114 


1»: 


MOW 


••1.80HBC 


(TRANSMIT 1 CHARACTER 


001640 


012777 


012046 


010104 




nov 


•TDATA.80HBA 


(ADDRESS OF TRANSMITTED DATA 


001646 


012777 


000002 


010104 




MOV 


•2.80HBCR 


(SET BREAK FOR LINE 1. 


001654 


012777 


000002 


010074 




MOV 


•2.80HBAR 


(START TRANSMITTER 


001662 


105777 


010056 




2»: 


TSTB 


80HSCR iUAIT 


FOR CHARACTER TO BE RECEIVED 


001666 


100375 








BPL 


2t 




001670 


017701 


010052 






MOV 


80KNRC.R1 


(GET RECEIVED CHARACTER 


001674 


020501 








CMP 


RS.Rl (COMPARE EXPECTED AND RECEIVED DATA 


001676 


001401 








BEQ 


.♦4 




001700 










HLT 


3 (DATA 


ERROR 


001700 


104003 








EKT 


3 




001702 


104400 






41: 


SCOPE 


(CHECK FOR ITERATIONS. LOOP 




000002 






LINE 


>LINE*1 








000004 






BITX 


-BITX*BITX 







001704 



POPOVER \LINE.\BITX 



(RECEIVER PARITY LOGIC TEST ON LINE 2. 

(TRANSMIT ONE CHARACTER TO THE RECEIVER 

(WITH ODD PARITY SET. BREAK SET.HOX SET. 

(THE RECEIVER WILL RECEIVE AN ALL O'S CHARACTER 

(WITH EVEN PARITY AND THEREBY 

(CAUSE A PARITY ERROR AND OVERRUN 

(CHARACTER LENGTH: 8 BITS 

(LINE SPEED: 9600 BAUD 



001704 

001704 012767 000340 176064 

001712 012767 000010 010072 

001720 012767 002044 010060 

001726 012767 001774 010054 



TS 
T3 



MOV 
MOV 
MOV 
IF NB <lt> 
MOV 



\XN.10.4t.l» 

♦340, PS 
♦lO.ICOUNT 
•4). ESCAPE 



♦ll.FREEZl 



(DISABLE ALL INTEPRUPTS 
(SET UP FOR 10 ITERATIONS 
(SET UP TO ESCAPE TO NEXT TEST 

(SET UP TO LOOP UITH DATA 
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SEQ 30 



000004 

001734 012777 004000 010002 

001742 012703 000002 

001746 012705 131000 



.ENOC 
XN-XN*1 



MOV 
MOV 
MOV 



MIT11.80HSCR s MASTER CLEAR INTERFACE 
*2.R3 I SET UP LINE * 
*2*400*1 30000. R5 



(SET EXPECTED LINE NUMBCR 
! VALID DATA FLAG. 
{PARITY ERROR. DATA OVERRUN, 
lANO EXPECTED DATA 



001752 


012767 


000377 


010066 




MOV 


♦377,TDATA 


(ACTUAL DATA TO BE TRANSMITTED 


CO 1760 


012777 


000002 


007756 




MOV 


*2,80HSCR 


J SELECT LINE 2 


001766 


012777 


073563 


007754 




MOV 


*73563.80HLPR 


t SELECT 8 BITS/CHAR. ODD PARITY 
t9600 BAUD SPEED FOR LINE 2 


001774 


012777 


177777 


007752 


1$: 


MOV 


*-l.SOHBC 


i TRANSMIT 1 CHARACTER 


002002 


012777 


012046 


007742 




MOV 


*TDATA,80HBA 


i ADDRESS OF TRANSMITTED DATA 


002010 


012777 


000004 


007742 




MOV 


«4.80HBCR 


(SET BREAK FOR LINE 2. 


002016 


012777 


000004 


007732 




MOV 


M.8DHBAR 


{START TRANSMITTER 


002024 


105777 


007714 




2$: 


TSTB 


80HSCR lUAIT 


FOR CHARACTER TO BE RECEIVED 


002030 


100375 








BPL 


2* 




002032 


017701 


007710 






MOV 


80HNRC.R1 


!gET received CHARACTER 


002036 


020501 








CMP 


R5,R1 :C0MPARE EXPECTED AND RECEIVED DATA 


002040 


001401 








BEQ 


.♦4 




002042 










HLT 


3 ;0ATA 


ERROR 


0C2042 


104003 








EMT 


3 




0C2044 


104400 






4$: 


SCOPE 


(CHECK FOR ITERATIONS. LOOP 




000003 






LINE 


-LINE*1 








000010 






BITX 


•BITX^BITX 







002046 



POPOVER VLINE.VBITX 



{RECEIVER PARITY LOGIC TEST ON LINE 3. 

{TRANSMIT ONE CHARACTER TO THE RECEIVER 

{WITH 000 PARITY SET. BREAK SET.HDX SET. 

{THE RECEIVER UILL RECEIVE AN ALL O'S CHARACTER 

tUITH EVEN PARITY AND THEREBY 

{CAUSE A PARITY ERROR AND OVERRUN 

(CHARACTER LEWSTH: B BITS 

(LINE SPEED: 9600 BAUD 



002046 
002046 
002054 
002062 



012767 
012767 
012767 



000340 
000010 
002206 



175722 
007730 
007716 



002070 012767 002136 007712 



TS 
T4: 



.IF 



002076 
002104 
002110 



000C05 
012777 
012703 
012705 



004000 
000003 
131400 



007640 



\XN 
MOV 
MOV 
MOV 
NB <ll 

nov 

.ENDC 
XN-XNtl 

MOV 
MOV 
MOV 



.10.4».lt 

♦340.PS 
♦lO.ICOUNT 
•4 I. ESCAPE 

♦It.FREEZl 



(DISABLE ALL INTERRUPTS 
{SET UP FOR 10 ITERATIONS 
(SET UP TO ESCAPE TO NEXT TEST 

(SET UP TO LOOP UITH DATA 



«eiTll,80HSCR (MASTER CLEAR INTERFACE 
•3.R3 iSET UP LINE « 
•3*400*130000, R5 



(SET EXPECTED LINE NUWFR 
(VALID DATA FLAG. 
(PARITY ERROR. DAT A OVERRUN. 
(AND EXPECTED DATA 



002114 


012767 


000377 


007724 


MOV 


♦377.T0ATA 


(ACTUAL DATA TO BE TRANSMITTED 


002122 


012777 


000003 


007614 


MOV 


♦S.BDHSCR 


(SELECT LINE 3 


002130 


012777 


073563 


007612 


MOV 


«73563.80HLPR 


(SELECT 8 BITS/CHAR. ODD PARITY HOX. 














{9600 BAUD SPEED FOR LINE 3 


002136 


012777 


177777 


007610 1*: 


MOV 


♦-1.80HBC 


(TRANSMIT 1 CHARACTER 


002144 


012777 


012046 


007600 


MOV 


«TDATA.8DHBA 


(ADDRESS OF TRANSMITTED DATA 



rZDHG-CO 



HACRO V04.00 27-JUN-85 13:01:48 PAGE 21-3 



SEQ 31 



002152 
002160 
002166 
002172 
002174 
002200 
002202 
002204 
002204 
002206 



002210 



01277 ; 000010 007600 
012777 000010 007570 
105777 007552 
100375 

017701 007546 

020501 

001401 

104003 
104400 
000004 
000020 



0C2210 
002210 
002216 
002224 



012767 
012767 
012767 



000340 
000010 
002350 



175560 
007566 
007554 



002232 012767 002300 007550 



002240 
002246 
002252 



000006 
012777 
012703 
012705 



004000 
000004 
132000 



007476 



riov 

MOV 

2« ; TSTB 
BPL 
MOV 
CMP 
BEQ 
HLT 
EMT 

4$ : SCOPE 
LINE-LINE^l 
BITX-BITX«BITX 
POPOVER \LINE.\BITX 



«10.8DHBCR 
«10.80HBAR 
8DHSCR iUAIT 
2* 

80HNRC.R1 



I SET BREAK FOR LINE 3. 
(START TRANSMITTER 
FOR CHARACTER TO BE RECEIVED 

IgET RECEIVED CHARACTER 



RS.Rl tCOMPARE EXPECTED AND RECEIVED DATA 
.♦4 

3 iOATA ERROR 

3 

sCHECK FOR ITERATIONS. LOOP 



: RECEIVER PARITY LOGIC TEST ON LINE 4. 

s TRANSMIT ONE CHARACTER TO THE RECEIVER 

iUITH ODD PARITY SET. BREAK SET.HDX SET. 

iTHE RECEIVER WILL RECEIVE AN ALL O'S CHARACTER 

iUITH EVEN PARITY AND THEREBY 

s CAUSE A PARITY ERROR AND OVERRUN 

{CHARACTER LENGTH: 8 BITS 

(LINE SPEED: 9600 BAUD 



TS \XN.10 
T5: MOV 
MOV 
MOV 

-IF NB <!♦> 



.ENOC 
XN«XN*1 



MOV 



.4».1» 
«340,PS 
MO.ICOUNT 
•4$. ESCAPE 

MI.FREEZl 



{DISABLE ALL INTERRUPTS 
:SET UP FOR 10 ITERATIONS 
:SET UP TO ESCAPE TO NEXT TEST 

sSET UP TO LOOP UITH DATA 



MOV 
MOV 
MOV 



4BIT11.80HSCR tMASTER CLEAR INTERFACE 
•4.R3 (SET UP LINE « 

•4*400*130000.R5 sSET EXPECTED LINE NUMBER 

i VALID DATA FLAG. 
.'PARITY ERROR, DATA OVERRUN. 
iANO EXPECTED DATA 



002256 


012767 


000377 


007562 




MOV 


#377.T0ATA 


(ACTUAL DATA TO BE TRANSMITTED 


002264 


012777 


000004 


007452 




MOV 


M.aOHSCR 


> SELECT LINE 4 


002272 


012777 


073563 


007450 




MOV 


#73563. aOHLPR 


t SELECT 8 BITS/CHAR. ODD PARITY 
(9600 BAUD SPEED FOR LINE 4 


002300 


012777 


177777 


007446 


11: 


MOV 


•-1.80HBC 


t TRANSMIT 1 CHARACTER 


002306 


012777 


012046 


007436 




MOV 


•TDATA.8DHBA 


(ADDRESS OF TRANSMITTED DATA 


002314 


012777 


000020 


007436 




MOV 


•20.80HBCR 


(SET BREAK FOR L^NE 4. 


002322 


012777 


000020 


007426 




MOV 


•20,80HBAR 


(START TRANSMITTER 


002330 


105777 


007410 




21: 


TSTB 


80HSCR tUAIT 


FOR CHARACTER TO BE RECEIVED 


002334 


100375 








BPL 


21 




002336 


017701 


007404 






MOV 


SOHNRC.Rl 


Iget received character 


002342 


020501 








CMP 


R5.R1 i COMPARE EXPECTED AND RECEIVED DATA 


002344 


001401 








BEQ 


.♦4 




002346 










HLT 


3 sDATA 


ERROR 


002346 


104003 








EMT 


3 




002350 


104400 






41: 


SCOPE 


tCHECK FOR ITERATIONS. LOOP 




000005 






LINE 


-LINE*1 








000040 






BITX 


-BITX*BITX 







002352 



POPOVER \LINE.\BITX 



C20HG-C0 



MACRO V04.00 27-J-JN-8S 13:01:48 PAGE 21-4 



SEQ 32 



I RECEIVER PARITY LOGIC TESTON LINE 5. 

{TRANSMIT ONE CHARACTER TO THE RECEIVER 

;UITH ODD PARITY SET, BREAK SET.HDX SET. 

(THE RECEIVER WILL RECEIVE AN ALL 0' S CHARACTER 

(WITH EVEN PARITY AND THEREBY 

; CAUSE A PARITY ERROR AND OVERRUN 

{CHARACTER LENGTH: 8 BI'IS 

(LINE SPEED: 9600 BAUD 



002352 
002352 
002360 
002366 



012767 
012767 
012767 



000340 
000010 
002512 



175416 
007424 
007412 



TS 
T6: 



002374 012767 002442 007406 

000007 



.IF NB 

.ENDC 
XN-XN*1 



\XN.10 

NOV 

NOV 

MOV 

<1»> 

MOV 



.4».1$ 
«340,PS 
♦lO.ICOUNT 
f4$. ESCAPE 

«1«.FREEZ1 



{DISABLE ALL INTERRUPTS 
{SET UP FOR 10 ITERATIONS 
{SET UP TO ESCAPE TO NEXT TEST 

(SET UP TO LOOP WITH DATA 



{ 3 



002402 


012777 


004000 


007334 




MOV 


«BIT11,SDHSCR 


(MASTER CLEAR INTERFACE 


002410 


012703 


000005 






MOV 


*S.R3 (SET UP LINE « 


002414 


012705 


132400 






MOV 


*S*400*130000.R5 (SET EXPECTED LINE NUMBER 
















{VALID DATA FLAG, 
















(PARITY ERROR, DATA OVERRUN, 
















(AND EXPECTED DATA 


0C2420 


012767 


000377 


007420 




MOV 


♦377,TDATA 


(ACTUAL DATA TO BE TRANSMITTED 


002426 


012777 


000005 


007310 




MOV 


♦S.80HSCR 


(SELECT LINE 5 


002434 


012777 


073563 


007306 




MOV 


♦73563. 80HLPR 


(SELECT 8 BITS/CHAR. ODD PARITY HDX. 
(9600 BAUD SPEED FOR LINE 5 


002442 


012777 


177777 


007304 


1»: 


MOV 


«-1.80HBC 


{TRANSMIT 1 CHARACTER 


002450 


012777 


012046 


007274 




MOV 


«T0ATA.S0HBA 


(ADDRESS OF TRANSMITTED DATA 


002456 


012777 


000040 


007274 




MOV 


♦40.80HBCR 


(SET BREAK FOR LINE 5. 


002464 


012777 


000040 


007264 




MOV 


«40,80HBAR 


(START TRANSMITTER 


002472 


105777 


007246 




2t: 


TSTB 


8DHSCR (UAIT 


FOR CHARACTER TO BE RECEIVED 


002476 


100375 








BPL 


2$ 




002500 


017701 


007242 






MOV 


nHNRC.Rl 


(GET RECEIVED CHARACTER 


002504 


020501 








CMP 


R5.R1 (COMPARE EXPECTED AND RECEIVED DATA 


002506 


001401 








BEQ 


.♦4 




002510 










HLT 


3 (DATA 


ERROR 


002510 


104003 








EMT 


3 




002512 


104400 






4$: 


SCOPE 


(CHECK FOR ITERATIONS. LOOP 




000006 






LINE 


-LINe*l 








000100 






BITX 


-BITXtBITX 







002514 



POPOVER \LINE.\BITX 



(RECEIVER PARITY LKIC TEST ON LINE 6. 

(TRANSMIT ONE CHARACTER TO THE RECEIVER 

(UITH ODD PARITY SET. BREAK SET.HDX SET. 

{THE RECEIVER UILL RECEIVE AN ALL O'S CHARACTER 

(WITH EVEN PARITY AND THEREBY 

(CAUSE A PARITY ERROR AND OVERRUN 

(CHARACTER LENGTH: 8 BITS 

(LINE SPEED: 9600 BAUD 



002514 

002514 012767 000340 175254 

002522 012767 000010 007262 

002530 012767 002654 007250 



TS 
T7 



\XN.10.4$.1I 
MOV «340.PS 
MOV flO.ICOUNT 
MOV «4$, ESCAPE 
IF NB <1$> 



(DISABLE ALL INTERRUPTS 
(SET UP FOR 10 ITERATIONS 
{SET UP TO ESCAPE TO NEXT TEST 



CZOHG-CO 



MACRO V04.00 27-JUN-8S 13:01:48 PAGE 21-5 



SEQ 33 



002536 012767 002604 007244 
000010 



.ENDC 
XN-XN*1 



HOV 



•ll.FREEZl 



:SET UP TO LOOP UITH DATA 



) 3 



002544 


012777 


004000 


007172 




nov 


«eiT11.80HSCR 


sHASTER CLEAR INTERFACE 


002552 


012703 


000006 






nov 


•6.R3 tSET UP LINE • 


002556 


012705 


133000 






nov 


«6*400«130000.R5 :SET EXPECTED LINE NUMBER 
















s VALID DATA FLAG. 
















: PARITY ERROR. DATA OVERRUN 
















lAND EXPECTED DATA 


002562 


012767 


000377 


007256 




nov 


♦377,TDATA 


.-ACTUAL DATA TO BE TRANSMITTED 


002570 


012777 


000006 


007146 




nov 


46.S0HSCR 


'SELECT LINE 6 


002576 


012777 


073563 


007144 




nov 


«73563.S0HLPR 


j SELECT 8 BITS/CHAR. ODD PARITY HDX 
t9600 BAUD SPEED FOR LINE 6 


002604 


012777 


177777 


007142 


If: 


nov 


«-l.SDHBC 


; TRANSMIT 1 CHARACTER 


002612 


012777 


012046 


007132 




nov 


«TDATA.B0HBA 


: ADDRESS OF TRANSMITTED DATA 


002620 


012777 


000100 


007132 




nov 


nOO.SOHBCR 


iSET BREAK FOR LINE 6. 


002626 


012777 


000100 


007122 




nov 


«100.80HBAR 


i START TRANSMITTER 


002634 


105777 


007104 




2*: 


TSTB 


80HSCR ;UAIT 


FOR CHARACTER TO BE RECEIVED 


002640 


100375 








BPL 


21 




002642 


017701 


007100 






nov 


BOHNRC.Rl 


IgET RECEIVED CHARACTER 


002646 


020501 








CMP 


R5.R1 iCOMPARE EXPECTED AND RECEIVED DATA 


002650 


001401 








BEQ 


.** 




002652 










HLT 


3 iOATA 


ERROR 


002652 


104003 








EMT 


3 




002654 


104400 






4«: 


SCOPE 


i CHECK FOR ITERATIONS. LOOP 




000007 






LINE 


-LINE^l 








000200 






BITX 


•BITX»BITX 







002656 



POPOVER \LINE.\BITX 



iRECEIVER PARITY LOGIC TEST ON LINE 7. 

i TRANSMIT ONE CHARACTER TO THE RECEIVER 

tUITH 000 PARITY SET. BREAK SET. HDX SET. 

I THE RECEIVER UILL RECEIVE AN ALL O'S CHARACTER 

iUITH EVEN PARITY AND THEREBY 

(CAUSE A PARITY ERROR AND OVERRUN 

•CHARACTER LENGTH: 8 BITS 

iLINE SPEED: 9600 BAUD 



002656 
002656 
002664 
002672 



012767 
012767 
012767 



000340 
000010 
003016 



175112 
007120 
007106 



TS 
TIO: 



002700 012767 002746 007102 



002706 
002714 
002720 



002724 
002732 
002740 



000011 
012777 
012703 
012705 



012767 
012777 
012777 



004000 
000007 
133400 



000377 
000007 
073563 



007030 



007114 
007004 
007002 



nov 
nov 
nov 

.IF NB <!•> 

nov 

.ENOC 
XN-XN*! 

nov 
nov 
nov 



nov 
nov 
nov 



\XN.10.4t.ll 

•340. PS 
♦lO.ICOUNT 
•4 1. ESCAPE 



♦ll.FREEZl 



I DISABLE ALL INTERRUPTS 
I SET UP FOR 10 ITERATIONS 
;SET UP TO ESCAPE TO NEXT TEST 

I SET UP TO LOOP UITH DATA 



I 3 



«eiT11.80HSCR (MASTER CLEAR INTERFACE 
«7.R3 (SET UP LINE * 
«7*400«130000.R5 



002746 012777 177777 007000 1»: 



nov 



♦377.T0ATA 
*7,80HSCR 
#73563. «)HLPR 

•-1.S0HBC 



(SET EXPECTED LINE NUMBER 
; VALID DATA FLAG. 
sPARITY ERROR, DATA OVERRUN. 
:ANO EXPECTED DATA 
(ACTUAL DATA TO BE TRANSMITTED 
(SELECT LINE 7 

(SELECT 8 BITS/CHAR, ODD PARITY HDX. 
(9600 BAUD SPEED FOR LINE 7 
(TRANSMIT 1 CHARACTER 



CZOHG CO 



flACRO V04.00 27-JUN-85 13:01:48 PAjE 21-6 



SEQ 34 



002754 


012777 


012046 


006770 




MOV 


•TDATA.SDHBA {ADDRESS OF TRANSMITTED DATA 


002762 


012777 


000200 


006770 




MOV 


#200.S0H6CR sSET BREAK FOR LINE 7. 


002770 


012777 


000200 


006760 




MOV 


•200,80H6AR {START TRANSMITTER 


002776 


105777 


006742 




2t: 


TSTB 


SOHSCR {WAIT FOR CHARACTER TO BE RECEIVED 


003002 


100375 








BPL 


2t i 


003004 


017701 


006736 






MOV 


80HNRC,R1 :GET RECEIVED CHARACTER 


003010 


020501 








CMP 


R5.R1 {COMPARE EXPECTED AND RECEIVED DATA 


1^3012 


001401 








BEQ 




003014 










HLT 


3 {DATA ERROR 


003014 


104003 








EMT 


3 


003016 


104400 






4«: 


SCOPE 


{CHECK FOR ITERATIONS. LOOP 




000010 






LINE 


-LZNE*1 






000400 






BITX-6ITX*BITX 





003020 



POPOVER \LINE,\BITX 



003020 
003020 
003026 
003034 



003050 
003056 
003062 



{RECEIVER PARITY LOGIC TEST ON LINE 10. 

{TRANSMIT ONE CHARACTER TO THE RECEIVER 

(UITH ODD PARITY SET, BREAK SET.HOX SET. 

(THE RECEIVER UILL RECEIVE AN ALL O'S CHARACTER 

tUITH EVEN PARITY AND THEREBY 

{CAUSE A PARITY ERROR AND OVERRUN 

(CHARACTER LENGTH: 8 BITS 

(LINE SPEED: 9600 BAUD 



012767 
012767 
012767 



000340 
000010 
003160 



174750 
006756 
006744 



TS 
Til: 



003042 012767 003110 006740 



000012 
012777 
012703 
012705 



.IF NB 

.ENOC 
XN-XN*1 



\XN.10 
MOV 
MOV 
MOV 
<!♦> 
MOV 



.41.11 
«340,PS 

♦lO.ICOUNT 
«4). ESCAPE 

MI.FREEZl 



{DISABLE ALL INTERRUPTS 
(SET UP FOR 10 ITERATIONS 
(SET UP TO ESCAPE TO NEXT TEST 

{SET UP TO LOOP UITH DATA 



{ 3 



004000 
000010 
134000 



006666 



MOV 
MOV 
MOV 



46IT11. SOHSCR (MASTER CLEAR INTERFACE 
♦10.R3 (SET UP LINE * 
•10*400* 130000, RS 



(SET EXPECTED LINE NUMBER 
(VALID DATA FLAG. 
(PARITY ERROR. DATA OVERRUN. 
(AND EXPECTED DATA 



003066 


012767 


000377 


006752 




MOV 


#377.TDATA 


{ACTUAL DATA TO BE TRANSMITTED 


003074 


012777 


000010 


006642 




MOV 


MO.VHSCR 


(SELECT LINE 10 


003102 


012777 


073563 


006640 




MOV 


•73563. 80HLPR 


(SELECT 8 BITS/CHAR. 000 PARITY 
(9600 BAUD SPEED FOR LINE 10 


003110 


012777 


177777 


006636 


11: 


MOV 


•-l.nHBC 


(TRANSMIT 1 CHARACTER 


003116 


012777 


012046 


006626 




MOV 


•TDATA.SDHBA 


(ADDRESS OF TRANSMITTED DATA 


003124 


012777 


000400 


006626 




MOV 


•40O.S0HBCR 


(SET BREAK FOR LINE 10. 


003132 


012777 


000400 


006616 




MOV 


•400.80HBAR 


(START TRANSMITTER 


003140 


105777 


006600 




2*1 


TSTB 


SOHSCR (UAIT 


FOR CHARACTER TO BE RECEIVED 


003144 


100375 








BPL 


21 




003146 


017701 


006574 






MOV 


80HNRC.R1 


!get received character 


003152 


020501 








CMP 


R5.R1 (COMPARE EXPECTED AND RECEIVED DATA 


003154 


001401 








BEQ 


.♦4 




003156 










HLT 


3 (DATA ERROR 


003156 


104003 








EMT 


3 




003160 


104400 






4t: 


SCOPE 


(CHECK FOR ITERATIONS. LOOP 




000011 






LINE 


-LINE*1 








001000 






BITX 


-BITX*BITX 







003162 



POPOVER \LINE.\BITX 



CZOHG-CO 



MACRO V04.00 27-JUN-85 13:01:48 PAGE 21-7 



SEQ 35 



;RECEIVER PARITY LOGIC TEST ON LINE 11. 

: TRANSMIT ONE CHARACTER TO THE RECEIVER 

jMITH 000 PARITY SET. BREAK SET.HDX SET. 

iTHE RECEIVER WILL RECEIVE AN ALL O'S CHARACTER 

iUITH EVEN PARITY AND THEREBY 

t CAUSE A PARITY ERROR AND OVERRUN 

(CHARACTER LENGTH: 0 BITS 

(LINE SPEEO: 9600 BAUD 



003162 








TS 


\XN.10 


003162 


0127^7 


000340 


174606 


TIP' 


HOV 


003170 


012767 


000010 


006614 




MOV 


003176 


012767 


003322 


006602 




MOV 










.IF NB 


<1»> 


003204 


012767 


003252 


006576 




MOV 










.ENOC 






000013 






XN-XN*1 




003212 


012777 


004000 


006524 




MOV 


003220 


012703 


000011 






MOV 


003224 


012705 


134400 






MOV 


003230 


012767 


000377 


006610 




MOV 


003236 


012777 


000011 


006500 




MOV 


003244 


012777 


073303 


006476 




MOV 


003252 


012777 


177777 


006474 


11: 


MOV 


003260 


012777 


012046 


006464 




MOV 


003266 


012777 


001000 


006464 




MOV 


003274 


012777 


001000 


006454 




MOV 


003302 


105777 


006436 




21: 


TSTB 


003306 


100375 








BPL 


003310 


017701 


006432 






MOV 


003314 


020501 








CMP 


003316 


001401 








B£Q 


003320 










HLT 


003320 


104003 








EMT 


003322 


104400 






41: 


SCOPE 




000012 






LINE*LZf4E«l 




002000 






BITX-BITX«BITX 



,4».1» 
#340. PS 
«10,IC0UNT 
«4«. ESCAPE 

•1«.FREEZ1 



s DISABLE ALL INTERRUPT:^ 
:SET UP FOR 10 ITERATIONS 
;SET UP TO ESCAPE TO NEXT TEST 

:SET UP TO LOOP WITH DATA 



•eiTll.SDHSCR {MASTER CLEAR INTERFACE 
•11, R3 sSET UP LINE • 
•11*400* 130000. R5 



•377,TDATA 
•ll.SOHSCR 
•73563. 8DHLPR 

•-l.a)HBC 
•TDATA.0OHBA 
•lOOO.SOHBCR 
•1000.80HBAR 



iSET EXPECTED LINE NUMBER 
: VALID DATA FLAG, 
(PARITY ERROR. DATA OVERRUN, 
(AND EXPECTED DATA 
(ACTUAL DATA TO BE TRANSMITTED 
(SELECT LINE 11 

(SELECT 8 BITS/CHAR. ODD PARITY HOX, 
(9600 BAUD SPEED FOR LINE 11 
(TRANSMIT 1 CHARACTER 
(ADDRESS OF TRANSHITTED DATA 
(SET BREAK FOR LINE 11. 
(START TRANSIHTTB) 



SOHSCR (WAIT FOR CHARACTER TO BE RECEIVED 
21 t 

■HMRC.Rl (GET RECEIVED CHARACTER 

(CQNPARE EXPECTED AND RECEIVED DATA 



R5.R1 
.♦4 
3 
3 

(CHECK FOR ITERATIONS. LOOP 



I DATA ERROR 



003324 



POPOVER \LINE.\BITX 



(RECEIVED PARITY LOGIC TEST ON LINE 12. 

I TRANSMIT ONE CHARACTER TO THE RECEIVER 

iUHH ODD PARITY SET. BREAK SET. HOX SET. 

(THE RECEIVER WILL RECEIVE AN ALL O'S CHARACTER 

(UITH EVEN PARITY AND THEREBY 

(CAUSE A PARITY ERROR AND OVERRUN 

(CHARACTER LENGTH: B BITS 

(LINE SPEEO: 9600 BAUD 



003324 

003324 012767 

003332 012767 

003340 012767 



000340 174444 
000010 006452 
003464 006440 



TS 
T13: 



\XN.10.4«.1I 
MOV •340, PS 
MOV •lO.ICOUNT 
MOV •4», ESCAPE 



(DISABLE ALL INTERRUPTS 
(SET UP FOR 10 ITERATIONS 
(SET UP TO ESCAPE TO NEXT TEST 



CZOHG-CO 



MACRO V04.00 27-JUN-85 13:01:4ft PAGE 21-8 



SEQ 36 



003346 012767 003414 006434 
000014 

003354 012777 004000 006362 

003362 012703 000C12 

003366 012705 135000 



.IF NB <1>> 
MOV 

.ENOC 
XN-XN*1 

HOV 
HOV 
HOV 



•It.FREEZl 



«BIT11,80HSCR 
«12.R3 :SET UP 
•lc*400* 130000. R5 



:SET UP TO LOOP WITH DATA 



> 3 



(MASTER CLEAR INTERFACE 
LINE « 

{SET EXPECTED LINE NUMBER 
> VALID DATA FLAG. 
> PARITY ERROR, DATA OVERRUN. 
(AND EXPECTED DATA 



003372 


012767 


000377 


006446 




MOV 


♦377,T0ATA 


{ACTUAL DATA TO BE TRANSHITTED 


003400 


012777 


000012 


006336 




MOV 


«12.80HSCR 


t SELECT LINE 12 


003406 


012777 


073563 


006334 




MOV 


•73563. 8DHLPR 


(SELECT 8 BITS/CHAR. ODD PARITY 
(9600 BAUD SPEED FOR LINE 12 


003414 


012777 


177777 


006332 




MOV 


•-l.tfHBC 


(TRANSMIT 1 CHARACTER 


003422 


012777 


012046 


006322 




MOV 


«TDATA.8DHBA 


(ADDRESS OF TRANSMITTED DATA 


003430 


012777 


002000 


006322 




MOV 


•2000.8DHBCR 


(SET BREAK FOR LINE 12. 


003436 


012777 


002000 


006312 




MOV 


«2000.80HBAR 


(START TRANSMITTER 


003444 


105777 


006274 




2»: 


TSTB 


SOHSCR lUAIT 


FOR CHARACTER TO BE RECEIVED 


003450 


100375 








BPL 


2) 




003452 


017701 


006270 






MOV 


8DHNRC.R1 


(GET RECEIVED CHARACTER 


003456 


020501 








CW 


R5.R1 t COMPARE EXPECTED AND RECEIVED DATA 


003460 


001401 








BEQ 


.♦4 




003462 










HLT 


3 iOATA 


ERROR 


003462 


1040C3 








EMT 


3 




003464 


104400 






4t: 


SCOPE 


t CHECK FOR ITERATIONS. LOOP 




000013 






LINE 


-LINE«1 








004000 






BITX-BITX»BITX 







003466 



POPOVER \LINE.\BZTX 



(RECEIVER PARITY LOGIC TEST ON LINE 13. 

i TRANSMIT ONE CHARACTER TO THE RECEIVER 

tUITH 000 PARITY SET .BREAK SET.HOX SET. 

;THE RECEIVER UILL RECEIVE AN ALL O'S CHARACTER 

tUITH EVEN PARHY AND THEREBY 

(CAUSE A PARITY ERROR AND OVERRUN 

(CHARACTER LENGTH; 8 BITS 

(LINE SPEED: 9600 BAUD 



003466 
003466 
003474 

003502 



012767 
012767 
012767 



000340 
000010 
003626 



003510 012767 003556 



003516 
003524 
003530 



003534 
003542 
003550 



000015 
012777 
012703 
012705 



012767 
012777 
012777 



004000 
000013 
135400 



000377 
000013 
073563 



174302 
006310 
006276 

006272 
006220 



006304 
006174 
006172 



TS 

T14: 



HOV 
HOV 
HOV 
.IF NB <ll> 
HOV 

.ENOC 
XN-XN«1 

HOV 
HOV 
HOV 



HOV 
HOV 
HOV 



\XN.10.4*.1I 

♦340.PS 
•lO.ICOUNT 
•4 I. ESCAPE 



•1».FREEZ1 



(DISABLE ALL INTERRUPTS 
(SET UP FOR 10 ITERATIONS 
(SET UP TO ESCAPE TO NEXT TEST 

(SET UP TO LOOP WITH DATA 



iBITll.BOHSCR (MASTER aEAR INTERFACE 
•13.R3 (SET UP LINE • 

•1S«400*130000,RS (SET EXPECTED LINE NUMBER 

(VALID DATA FLAG, 
(PARITY ERkOR.OATA OVERRUN. 
(AND EXPECTED DATA 
(ACTUAL DATA TO Bt' TRANSHITTED 
(SELECT LINE 13 

(SELECT 8 BITS/CHAR, MO PARITY HDX. 
(9600 BAUD SPEED FOR LINE 13 



#377.TDATA 
MS. SOHSCR 
#73563, SOHLPR 
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SEQ 37 



003SM 


012777 


177777 


006170 


It: 


MOV 


003564 


012777 


012046 


006160 




MOV 


003572 


012777 


004000 


006160 




MOV 


003600 


012777 


004000 


006150 




MOV 


003606 


105777 


006132 




2t: 


TSTB 


003612 


100375 








BPL 


003614 


017701 


006126 






MOV 


003f20 


020501 








CMP 


AA ft 

003622 


AA a ^ A4 

001401 








BP A 

BEQ 


003624 










HLT 


003624 


104003 








EMT 


003626 


104400 






4t: 


SCOPE 




000014 






LINE 


-LZNE*1 




010000 






BZTX 


■BZTX*BZTX 



•-l.SOHBC iFRANSMZT 1 CHARACTER 

•TDATA.8DHBA i ADDRESS OF TRANSMZTTED DATA 
«4000,80HBCR iSET BREAK FOR LZNE 13. 
«4000,80HeAR t START TRANSMZTTER 
80HSCR lUAZT FOR CHARACTER TO BE RECEZVED 
2t i 

80HNRC.R1 iGET RECEZVED CHARACTER 

R5,R1 {COMPARE EXPECTED AND RECEZVED DATA 
.*4 

3 (DATA ERROR 

3 

iCHECK FOR ZTERATZONS.LOOP 



003630 



POPOVER \LZNE.\BZTX 



iRECEZVER PARZTY LXZC TEST ON LINE 14. 

(TRANSMIT ONE CHARACTER TO THE RECEIVER 

lUITH OOD PARITY SET. BREAK SET.HDX SET. 

iTHE RECEIVER UILL RECEZVE AN ALL O'S CHARACTER 

iUZTH EVEN PARZTY AND THEREBY 

(CAUSE A PARZTY ERROR AND OVERRUN 

(CHARACTER LENGTH: 8 BZTS 

(LINE SPEED: 9600 BAUD 



003630 








TS 


\XN.10.4t.lt 




003630 


012767 


000340 


174140 


T15: 


NOV 


•340. PS 


(DISABLE ALL INTERRUPTS 


003636 


012767 


000010 


006146 




NOV 


•lO.ICOUNT 


(SET UP FOR 10 ZTERATZONS 


003644 


012767 


003770 


006134 


.IF NB 


MOV 
<lt> 


Ml. ESCAPE 


(SET UP TO ESCAPE TO NEXT TEST 


003652 


012767 
000016 


003720 


006130 


.ENOC 
XN-XN»1 


NOV 


•ll.FREEZl 


(SET UP TO LOOP WITH DATA 


003660 


012777 


004000 


006056 




NOV 


«eiT11.80H$CR (MASTER 


aEAR INTERFACE 


003666 


012703 


000014 






NOV 


«14.R3 (SET UP LINE • 




003672 


012705 


136000 






NOV 


«14*400» 130000. RS 


(SET EXPECTED LINE NUMBER 
(VALID D^TA FLAG. 
(PARITY ERROR. DATA OVERRUN. 
(AND EXPECTED DATA 


003676 


012767 


000377 


006142 




NOV 


♦377.TDATA (ACTUAL 


DATA TO BE TRANSMITTED 


003704 


012777 


000014 


006032 




NOV 


•14.aOHSCR (SELECT 


LINE 14 


003712 


012777 


073563 


006030 




NOV 


•73563. aOHLPR i SELECT 


• BITS/CHAR. ODD PARITY HOX. 














(9600 BAUD SPEED FOR LINE 14 


003720 


012777 


177777 


006026 


It: 


NOV 


•-l.aOHBC (TRANSNIT 1 CHARACTER 


003726 


012777 


012046 


006016 




NOV 


•TDATA.iOHBA (AOOAESS OF TRANSMITTED DATA 


003734 


012777 


010000 


006016 




NOV 


•10000. aOHBCR (SET BREAK FOR LINE 14. 


003742 


012777 


010000 


006006 




NOV 


•10000. 8(MMR (START TRANSNITTER 


003750 


105777 


005770 




2t: 


TSTB 


VHSCR lUAIT FOR CHARACTER TO BE RECEIVED 


003754 


100375 








BPL 


21 t 




003756 


017701 


005764 






NOV 


VHNRC.Rl (GET RECEIVED CHARACTER 


003762 


020501 








CNP 


R5.R1 tCOt^ARE EXPECTED AND RECEIVED DATA 


003764 


001401 








BEQ 


.*4 




003766 










HI.T 


3 (DATA ERROR 




003766 


104003 








ENT 


3 




003770 


104400 






41: 


SCOPE 


(CHECK FOR ZTERATZONS.LOOP 




000015 






LINE-LINE*1 








020000 






BITX-BITX*BITX 







i 3 



CZOHG-CO 



HACRO V04.00 27-JUN-85 13:01:48 PAGc 21-10 



S£Q 38 



003772 



POPOVER \LZNE.\BZTX 



t RECEIVER PARITY LOGIC TEST ON LINE 15. 

I TRANSMIT ONE CHARACTER TO THE RECEIVER 

tUITH WO PARITY SET, BREAK SET.HOX SET. 

{THE RECEIVER UILL RECEIVE AN ALL 0' S CHARACTER 

iUITH EVEN PARITY AND THEREBY 

I CAUSE A PARITY ERROR AND OVERRUN 

iCHARACTER LENGTH: 8 BITS 

(LINE SPEED: 9600 BAUD 



003772 








TS 


\XN.10,4I.1I 




003772 


012767 


000340 


173776 


T16: 


NOV 


•340. PS 


(DISABLE ALL INTERRUPTS 


004000 


012767 


000010 


006004 




NOV 


•lO.ICOUNT 


(SET UP FOR 10 ITERATIONS 


004006 


012767 


004132 


005772 




NOV 


•41. ESC APE 


iSET UP TO ESCAPE TO NEXT TEST 










.IF NB 


<ll> 




004014 


012767 


004062 


005766 


.ENDC 


NOV 


•ll.FREEZl 


iSET UP TO LOOP UITH DATA 




000017 






XN>XN*1 








004022 


012777 


004000 


005714 




NOV 


•6IT11.S0HSCR 


iNASTER aEAR INTERFACE 


004030 


012703 


000015 






NOV 


•15. R3 tSET UP LINE • 


004034 


012705 


136400 






NOV 


•15*400* 130000, R5 iSET EXPECTED LINE NUMBER 
















1 VALID DATA FLAG. 
















i PARITY ERROR. DATA OVERRUN. 
















lAND EXPECTED DATA 


004040 


012767 


000377 


AAA 

006000 




NOV 


•377.TDATA 


1 ACTUAL DATA TO BE TRANSMITTED 


00404O 


012777 


uvvOls 


AACA.7A 

0030 rO 




NOV 


•15.«0HSCft 


{SELECT LINE IS 


004054 


012777 


073563 


005666 




NOV 


•73563. 80HLPR 


1 SELECT B SITS/CHAR. OM) PARITY HDX. 
















{9600 BAUD SPEED FOR LINE 15 


004062 


012777 


177777 


005664 


11: 


NOV 


•-l.aOHBC 


1 TRANSMIT 1 CHARACTER 


004070 


012777 


012046 


005654 




NOV 


•TDATA.SOHBA 


lAOORESS OF TRANSnnTED DATA 


004076 


012777 


020000 


005654 




NOV 


•20000. iOHBCR 


iSET BREAK FOR LINE 15. 


004104 


012777 


020000 


005644 




NOV 


•20000. eOHBAR 


1 START TRANSMITTER 


004112 


105777 


005626 




21: 


TSTB 


SNSCR lUAIT FOR CNMACTER TO BE RECEIVED 


004116 


100375 








BPL 


2t 




004120 


017701 


005622 






NOV 


«>HNRC.R1 


!gET RECaVEO CHARACTER 


004124 


020501 








CUP 


RS.Rl iCQHP/ME EXPECTED MO RECEIVED DATA 


004126 


001401 








BEQ 


.♦4 




004130 










HLT 


S lOATA ERROR 


004.t30 


104003 








ENT 


3 




004132 


104400 






41: 


SCOPE 


iCNECK FOR ITERATIONS. LOOP 




000016 






LINE-LINE^l 








040000 






BITX-eiTX^BITX 







004134 



POPOVER \LINE.\BITX 



•RECEIVER PARITY LOGIC TEST ON LINE 16. 

I TRANSMIT ONE CHARACTER TO T»C RECEIVER 

lUITH ODD PARITY SET. BREAK SET. HDX SET. 

iT»C RECEIVER UILL RECEIVE AN ALL O'S CHARACTER 

lUITH EVEN PARITY AND THEREBY 

I CAUSE A PARITY ERROR AND OVERRUN 

iCHARACTER LENGTH: 8 BITS 

iLINE SPEED: 9600 BAUD 



004134 

004134 012767 000340 
004142 012767 000010 



173634 
005642 



TS 
T17: 



\XN.10.4t.l« 
NOV •340. PS 
NOV •lO.ICOUNT 



I DISABLE ALL INTERRUPTS 
I SET UP FOR 10 ITERATIONS 
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SCO 39 



004150 012767 004274 

004156 012767 004224 

000020 

004164 012777 004000 

004172 012703 000016 

004176 012705 137000 



004202 012767 
004210 012777 
004216 012777 



004224 
0042S2 
004240 
004246 
004254 
004260 
004262 
004266 
004270 
004272 
004272 
004274 



004276 



012777 
012777 
012777 
012777 
105777 
100375 
017701 
020501 
001401 

104003 
104400 

000017 
100000 



000377 
000016 
073563 

177777 
012046 
040000 
040000 
005464 

005460 



004276 
004276 
004304 
004S12 



012767 
012767 
012767 



000340 
000010 
004436 



005630 
005624 

005552 



005636 
005526 
005524 

005522 
005512 
005512 
005502 



nov 

.IF NB <ll> 

nov 

.ENDC 
XN-XN«1 

nov 
nov 
nov 



nov 
nov 
nov 

11: nov 
nov 
nov 
nov 

2» : TSTB 
BPL 

nov 

CMP 
BEQ 
HLT 
EMT 

41 : SCOPE 
LINE-LINE«1 
BITX-6ITX«BITX 
POPOVER \LZNE.\8ITX 



«4», ESCAPE 
#1».FREEZ1 



iSET UP TO ESCAPE TO NEXT TEST 
I SET UP TO LOOP WITH DATA 



I 3 



«6IT11.8DHSCR iMASTER CLEAR INTERFACE 
*16.R3 I SET UP LINE « 
«16*400« 130000, R5 



♦377.TDATA 
♦16.80HSCR 
♦73563. SOHLPR 

♦•1.80HBC 
♦TDATA.BDHBA 
•40000, BOHBCR 
•40000. BDHBAR 



iSET EXPECTED LINE NUMBER 
I VALID DATA FLAG, 
I PARITY ERROR. DATA OVERRUN. 
I AND EXPECTED DATA 
{ACTUAL DATA TO BE TRANSNITTEO 
I SELECT LINE 16 

(SELECT 8 BZTS/CHAR.OOD PARITY HOX. 
19600 BAUD SPEED FOR LINE 16 
t TRANSMIT 1 CHARACTER 
I ADDRESS OF TRANSMITTED DATA 
I SET BREAK FOR LINE 16. 
I START TRANSMITTER 



KHSCR iUAIT FOR CHARACTER TO BE RECEIVED 
21 

8DHNRC.R1 



iGET RECEIVED CHARACTER 
iCQMPARE EXPECTED AND RECEIVED DATA 



RS.Rl 
.♦4 
3 
3 

t CHECK FOR ITERATIONS, LOOP 



I DATA ERROR 



{RECEIVER PARITY LOGIC TEST ON LINE 17. 

I TRANSMIT ONE CHARACTER TO THE RECEIVER 

lUHH 000 PARITY SET. BREAK SET. HOX SET. 

I THE RECEIVER HILL RECEIVE AN ALL O'S CHARACTER 

lUHH EVEN PARHY AND THEREBY 

I CAUSE A PARITY ERROR ANO OVERRUN 

iCHARACTEX LENGTH: 8 BITS 

iLINE SPEED: 9600 BAUO 



173472 
005500 
005466 



IS 
T20: 



004320 012767 004366 005462 



004326 
004334 
004340 



004344 
004352 
004360 



000021 
012777 
012703 
012705 



012767 
012777 
012777 



004000 
000017 
137400 



000377 
090017 
07SS63 



005410 



005474 
005364 
00SS62 



NOV 
MOV 
MOV 
.IF m <ll> 
MOV 

.ENOC 
XN-XN«1 

MOV 
MOV 
MOV 



MOV 
MOV 
MOV 



\XN.10.4I.1I 



•MO. PS 
•lO.ICOUNT 
•«I,ESCAPE 

•19.FIIEEZ1 



•BITll.OOHSCR iMASTER 
•17,RS iSrr UP LINE • 
•17*400» 130000. R5 



•S77.T0ATA 
•n.ttHKR 
•7S563.«HLM 



(ACTUM. 
iSCLCCT 
iSatCT 



I DISABLE ALL INTERRUPTS 

I SET UP FOR 10 ITERATIONS 

I SET UP TO ESCAPE TO NEXT TEST 

I SET UP TO LOOP UITH DATA 



aEAR INTERFACE 

iSET EXPECTED LINE NUMBER 
I VALID DATA FUI6. 
iPARHY OMOR.OATA OVCRRUN. 
lAM) EXPECTED DATA 
OATA TO iC TMNSNinCD 
LINE 17 

0 BITS/CNAR.aOO PARITY HOX. 



i 3 
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SEQ 40 



004S66 
004374 
004402 
004410 
004416 
004422 
004424 
0044S0 
004432 
004434 
004434 
004436 



14 004440 



012777 177777 0053M) 

012777 012046 005350 

012777 100000 005350 

012777 100000 005340 

105777 005322 
100375 

017701 005316 

020501 

001401 

10400S 
104400 

000020 
000000 



1»: 



2*: 



nov 
nov 
nov 

HOV 

TSTB 

BPL 

HOV 

CHP 

BEQ 

HLT 



«-1.80HBC 
«TDATA,ODHBA 
♦100000. 80HBCR 
«100000.80HBAR 



I 9600 BAUD SPEED FOR LINE 17 
t TRANSMIT 1 CHARACTER 
(ADDRESS OF TRANSMITTED DATA 
J SET BREAK FOR LINE 17, 
t START TRANSMITTER 



SOHSCR I WAIT FOR CHARACTER TO BE RECEIVED 

?! » 

80HNRC.R1 iGET RECEIVED CHARACTER 

R5.R1 (COMPARE EXPEC1ED AND RECEIVED DATA 
.♦4 

3 (DATA ERROR 

3 

(CHECK FOR ITERATIONS, LOOP 



4$: SCOPE 
LINE-LINE*1 
BITX-BITX*BITX 

SUPERCALIFRIGILISTICEXPEHALIOOSIS 



27363.000,8 



(MULTI-LINE PARITY DATA TEST 
(TRANSMIT A BINARY COUNT WITH ODD PARITY 
(PATTERN ON ALL LINES. 
(SILO ALARM LEVEL SET TO 0 

(RECEIVER UILL BE SERVICED ON A PER CHARACTER BASI'i 
(IN INTERRUPT MODE. 

(TRANSMITTER INTERRUPT WILL BE DISABLED 
(LINE SPEED: 2400 BAUD 
(CHARACTER LENGTH: 8 * PARITY 



004440 








TS \XN.10.11» 




004440 


012767 


000340 


173330 


T21: 


MOV 


•340. PS 


004446 


012767 


000010 


005336 




MOV 


«10.IC0UNT 


004454 


012767 


004706 


005324 




MOV 


•lit. ESCAPE 










.IF NB 


< > 












MOV 


•.FREEZl 










.ENDC 








000022 






XN-XN'l 






004462 


012777 


004000 


005254 




MOV 


•BIT 11. SOHSCR 


004470 


012700 


000020 






MOV 


•16. .RO 


004474 


005001 








CLR 


Rl 


004476 


012702 


000200 






MOV 


•200.R2 


004502 


012703 


000001 






MOV 


•1.R3 


004506 


012777 


012050 


005236 


It: 


MOV 


•TBUF.gOHBA 










.IF 


ION 


8.8 


004514 


012777 


177400 


005232 




MOV 


•-400.80HBC 










.ENDC 












.IF 


ION 


7.8 












MOV 


•-200.80HBC 










.ENDC 












.IF 


ION 


6,8 












MOV 


•-lOO.BOHBC 










.ENOC 














.IF 


ION 


5,8 












MOV 


•-4O,0DHBC 










.ENOC 






004522 


012777 


027363 


005220 




MOV 


•27363. 8DHLPR 














(CHARA 


004530 


105061 


012450 






CLRB 


RBUF(Rl) 



(DISABLE ALL INTERRUPTS 
(SET UP FOR 10 ITERATIONS 
(SET UP ro ESCAPE TO NEXT TEST 

(SET UP TO LOOP WITH DATA 



MASTER CLEAR INTERFACE 
SET UP TO START 16. LINES 
COUNT AND BUS ADDRESS MEMORIES 
AND RECEIVED DATA STORAGE 

(SET UP 10 LOAD HIGH BYTE 

(OF EXPECTED DATA 

(LOAD BUSS ADDRESS 

(LOAD BYTE COUNT 



(LOAD BYTE COUNT 



(LOAD BYTE COUNT 



(LOAD BYTE COUNT 

:SET LINE SPEED AND 
LENGTH 8 ♦ ODD PARITY 

(CLEAR NEXT RECEIVED CHARACTER 



: 3 
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SEQ 41 



004SS4 


110263 


012450 




novB 


R2.RBUF(R3} 


004540 


005277 


005i?00 




INC 


80HSCR 


004544 


005202 






INC 


R2 


004546 


062701 


000002 




ADO 


•2.R1 


004S52 


06<r703 


000002 




AOO 


«2.R3 


004556 


0053C0 






DEC 


RO 


004560 


001352 






BNE 


It 


004562 


012777 


004622 


005176 


nov 


«6t.80HRVEC 


004570 


012777 


000240 


005172 


hOV 


*240,80HRLVL 


004576 


012777 


000100 


005140 


MOV 


«100,aOHSCR 


004604 


01277/ 


177777 


005144 


MOV 


•-l.OOHBAR 


004612 


005067 


173160 




CLR 


PS 


004616 


000167 


000076 




JMP 


121 



iLOAO HIGH BYTE 
(ADVANCE TO NEXT LINE 
lUPOATE POINTER TO 
iLOU AND .HIGH BYTE OF 
jNEXT EXPECTED CHARACTER 
J CONTINUE IF ALL LINES 
J NOT SET UP 
;SET UP POINTER FOR 
jRECEIVER INTERRUPT 
J ENABLE RECEIVER INTERRUPT 
;SET ALL BAR BITS 
; ENABLE INTERRUPTS 
iGO TO TRANSMITTER UAITING ROUTINE 

jRECEIVER INTERRUPT SERVICE ROUTINE 
(CHECK FOR RECEIVER OONL AND NO ERRORS 

(CHECK RECEIVED DATA FOR "VALID DATA" FLAG AND NO ERRORS 
(VERIFY THAT RECEIVED DATA IS CORRECT 
{CHECK FOR END OF PASS 



004622 105777 005116 6t: 

004626 100026 

004630 032777 040000 005106 

004636 001401 

004640 

004640 104002 

004642 017701 005100 7S: 

004646 010102 

004650 000302 

004652 042702 177760 

004656 010203 

004660 006302 

004662 026201 012450 

004666 001403 

004670 016205 012450 

004674 

004674 104003 

004676 105262 012450 

004702 000002 

004704 101: 

004704 104001 

004706 022626 ill: 

004710 012777 004000 005026 

004716 000411 



TSTB 

BPL 

BIT 

BEQ 

HLT 

EMT 

MOV 

MOV 

SUAB 

BIC 

NOV 

ASL 

CMP 

BEQ 

MOV 

HLT 

EMT 

INCe 

RTI 

HLT 

EMT 

P0P2SP 

NOV 

BR 



80HSCR 
101 

•40000. SOHSCR 
.*4 

2 
2 

80HNRC.R1 

R1.R2 

R2 

#177760. R2 

R2.R3 

R2 

RBUF(R2).R1 
.•10 

fnUF(R2),R5 

3 

3 

l«UF(R2) 

1 
1 

4BIT11. SOHSCR 
131 



:IF CHARACTER AVAILABLE NOT SET. ERROR 

sIF SILO OVERRUN SET. ERROR 

iSILO OVERRUN. ERROR 

{READ CHARACTER FROM SILO 
(EXTRACT LINE NUMBER 



(SAVE LINE NUMBER 

(USE LINE NUMBER AS OFFSET 

{COMPARE EXPECTED AND RECEIVED DATA 

(GET EXPECTED DATA 
iOATA ERROR 

(UPDATE EXPECTED CHARACTER 
i CONTINUE 

{CHARACTER AVAILABLE NOT SET. ERROR 

(RESTORE STACK 

(MASTER CLEAR INTERFACE 

{RESTART TEST 



004720 005777 005032 121: 

004724 001375 

004726 105777 005032 

004732 001375 

004734 012767 000340 173034 

004742 104400 13$: 



(UAIT FOR ALL BAR BITS TO CLEAR 
lUHEN ALL BAR BITS HAVE CLEARED. 
I WAIT FOR SILO TO EMPTY 
{WHEN SILO IS EMPTY, SCOPE ON TEST 



TST OOHBAR 

BNE .-4 

TSTB 80HSLR 

BNE .-4 

MOV «340.PS {PREVENT INTERRUPTS 

SCOPE {CHECK FOR ITERATIONS, LOOP 



{UAIT FOR ALL BAR BITS TO CLEAR 
{WAIT FOR SILO 10 EMPTY 
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SEQ 42 



15 004744 SUPERCM.IFRI6ILISTICEXPEHALID0SIS 27323, EVEN, 8 

iMULTI-LINE PARITY DATA TES( 

I TRANSMIT A BINARY COUNT UITH EVEN PARITY 

(PATTERN ON ALL LINES. 

tSILO ALARH LEVEL SET TO 0 

iRECEIVFR WILL BE SERVICED ON A PER CHARACTER BASIS 
I IN INTERRUPT f10D£. 

i TRANSMITTER INTERRUPT WILL BE DISABLED 
sLINE SPEED: 2400 BAUD 
{CHARACTER LENGTH: 8 * PARITY 



004744 








TS \XN.10.11I 






004744 


012767 


000340 


173024 


T22: 


NOV 


♦340.PS 


{DISABLE ALL INTERRUPTS 


004752 


012767 


000010 


005032 




nov 


•lO.ICOUNT 


:SET UP FOR 10 ITERATIONS 


004760 


012767 


005212 


005020 




nov 


♦111. ESC APE 


;SET UP TO ESCAPE TO NEXT TEST 
sSET UP TO LOOP UITH DATA 










.IF NB 


<> 

nov 


•.FREEZl 










.ENDC 










000023 






XN-XN*1 








004766 


012777 


004000 


004750 




nov 


«6IT11,8DHSCR 


{MASTER CLEAR INTERFACE 


004774 


012700 


000020 






nov 


•16. ,R0 


jjET UP TO START 16. LINES 


OCSOuO 


005001 








CLR 


Rl 


{COUNT AND BUS ADDRESS MEMORIES 
(AND RECEIVED DATA STORAGE 


005002 


012702 


000200 






nov 


*200,R2 


;SET UP TO LOAD HIGH BYTE 


005006 


012703 


000001 






nov 


*1.R3 


:0F EXPECTED DATA 


005012 


012777 


012050 


004732 


It: 
.IF 


nov 

ION 


♦TBUF.flDHBA 
8.8 


:L0A0 BUSS ADDRESS 


005020 


012777 


177400 


004726 




nov 


•-400.8DHBC 


sLOAD BYTE COUNT 










.ENDC 














.IF 


IDN 


7.8 














nov 


•-200.8DHBC 


iLOAD BYTE COUNT 










.ENDC 














.IF 


ION 

nov 


6.8 

•-lOO.SOHBC 


:LOAD BYTE COUNT 










.ENDC 
















.IF 


ION 

nov 


5,8 

•-40.80HBC 


:LOAO BYTE COUNT 










.ENDC 








005026 


012777 


027323 


004714 




nov 


•27323. 8DHLPR 

{CHARACTER 


{SET LINE SPEED AND 
LENGTH 8 ♦ EVEN PARITY 


005034 


105061 


012450 






CLR6 


R8UF(R1) 


{CLEAR NEXT RECEIVED CHARACTER 


005040 


110263 


012450 






novB 


R2.RBUF(R3) 


{LOAD HIGH BYTE 


005044 


005277 


004674 






INC 


8DHSCR 


{ADVANCE TO NEXT LINE 


005050 


005202 








INC 


R2 


{UPDATE POINTER TO 


005052 


062701 


000002 






ADD 


•2.R1 


{LOU AND HIGH BYTE OF 


005056 


062703 


000002 






ADD 


•2.R3 


{NEXT EXPECTED CHARACTER 


005062 


005300 








DEC 


RO 


{CONTINUE IF ALL LINES 


005064 


001352 








BNE 


It 


{NOT SET UP 


005066 


012777 


005126 


004672 




nov 


•6t.80HRVEC 


{SET UP POINTER FOR 


005074 


012777 


000240 


004666 




nov 


•240.0DHRLVL 


{RECEIVER INTERRUPT 


005102 


012777 


000100 


004634 




nov 


•100,8DHSCR 


(ENABLE RECEIVER INTERRUPT 


005110 


012777 


177777 


004640 




nov 


•-1,8DHBAR 


(SET ALL BAR BITS 


005116 


005067 


172654 






CLR 


PS 


(ENABLE INTERRUPTS 


005122 


000167 


000076 






JMP 


121 


(GO TO TRANSMITTER UAITING ROUTINE 



(RECEIVER INTERRUPT SERVICE ROUTINE 
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SEQ 43 



I CHECK FOR RECEIVER DONE AND NO ERRORS 

iCHECK RECEIVED DATA FOR "VALID DATA" FLAG AND NO ERRORS 
i VERIFY THAT RECEIVED DATA IS CORRECT 
i CHECK FOR END OF PASS 



005126 
005132 
005134 
005142 
005144 
005144 
005146 
005152 
005154 
005156 
005162 
005164 
005166 
005172 
005174 
005200 
005200 
005202 
0CS206 
005210 
005210 
005212 
005214 
005222 



105777 004612 
100026 

032777 040000 004602 
001401 

104002 

017701 004574 

010102 

000302 

042702 177760 

010203 

006302 

026201 012450 
001403 

016205 012450 
104003 

105262 012450 
000002 

104001 
022626 

012777 004000 004522 
000411 



6»i 



7$: 



101: 



TSTB 

BPL 

BIT 

BEQ 

HLT 

EMT 

HOV 

HOV 

SUAB 

BIC 

HOV 

ASL 

CMP 

BEQ 

HOV 

HLT 

EHT 

INCB 

RTI 

HLT 

EHT 

P0P2SP 

HOV 

BR 



SOHSCfi 

lot 

«4000C,8DHSCR 
.♦4 

2 
o 

SOHNRC.Rl 

R1.R2 

R2 

♦177760, R2 

R2,R3 

R2 

RBUF(R2).R1 
.♦10 

RBUF(R2).R5 

3 

3 

RBUF(R2) 

1 
1 

«6IT11,8DHSCR 
13 » 



sIF CHARACTER AVAILABLE NOT SET, ERROR 

ilF SILO OVERRUN SET, ERROR 

sSILO OVERRUN. ERROR 

;READ CHARACTER FROH SILO 
(EXTRACT LINE NUHBER 



SAVE LINE NUMBER 

USE LINE NUMBER AS OFFSET 

COMPARE EXPECTED AND RECEIVED DATA 

:GET EXPECTED DATA 
iOATA ERROR 

; UPDATE EXPECTED CHARACTER 
: CONTINUE 

i CHARACTER AVAILABLE NOT SET. ERROR 

RESTORE STACK 

MASTER C.EAR INTERFACE 

RESTART TEST 



005224 005777 004526 

005230 001375 

005232 105777 004526 

005236 001375 

005240 012767 000340 172530 

005246 104400 
16 005250 



iUAIT FOR ALL BAR BITS TO CLEAR 
:UHEN ALL BAR BITS HAVE CLEARED. 
J WAIT FOR SILO TO EMPTY 
(WHEN SILO IS EHPTY. SCOPE ON TEST 



12 >: TST 80HBAR 

BNE .-4 

TSTB 80HSLR 

BNE . -4 

MOV •340. PS iPREVENT INTERRUPTS 
13 >: SCOPE {CHECK FOR ITERATIONS. LOOP 



iUAIT FOR ALL BAR BITS TO CLEAR 
tUAIT FOR SILO TO EMPTY 



SUPERCALIFRIGILIS7ICEXPEHALID0SIS 



27362.000.7 



iHULTI-LINE PARITY DATA TEST 

I TRANSMIT A BINARY COUNT UITH ODD PARITY 

{PATTERN ON ALL LINES. 

I SILO ALMH LEVEL SET TO 0 

(RECEIVER WILL BE SERVICED ON A PER CHARACTER BASIS 
(IN INTERRUPT MODE. 

(TRANSMITTER INTERRUPT UILL BE DISABLED 
(LINE SPEED: 2400 BAUD 
(CHARACTER LENGTH: 7 * PARITY 



005250 

005250 012767 000340 172520 
005256 012767 000010 004526 



TS XXN.lO.llI 
T23: MOV 
MOV 



«340,PS 
•lO.ICOUNT 



(DISABLE ALL INTERRUPTS 
(SET UP FOR 10 ITERATIONS 
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SEQ 44 



005264 


012767 


005516 


004514 




flOV 


•llt.ESCAPE 










.IF NB 


< > 












nuv 


V.FREEZl 










.ENOC 








000024 






XN-XN^l 






005272 


012777 


004000 


004444 




MOV 


•eiTll.SOHSCR 


005300 


012700 


000020 






MOV 


«16..R0 


005304 


005001 








CLR 


Rl 


005306 


012702 


000200 






MOV 


♦200.R2 


005312 


012703 


000001 






MOV 


«1.R3 


005316 


012777 


012050 


004426 


11: 


MOV 


*TBUF.8DHBA 










.IF 


ION 


8.7 












MOV 


*-400.8DHBC 










.ENOC 














.IF 


IDN 


7.7 


005324 


012777 


177600 


004422 




MOV 


«-200.80HBC 










.ENOC 












.IF 


IDN 


6.7 












MOV 


«-100.i0HBC 










.ENOC 














.IF 


ION 


5.7 












MOV 


♦-40.80HBC 










.ENOC 






005332 


012777 


027362 


004410 




nov 


•27362. SDHLPR 














iCHAR/ 


005340 


105061 


012450 






CLRB 


RBUF(Rl) 


005344 


110263 


012450 






MOVB 


R2.RBUF(R3} 


005350 


005277 


004370 






INC 


SDHSCR 


005354 


005202 








INC 


R2 


005356 


062701 


000002 






ADD 


*2.R1 


005362 


062703 


000002 






ADD 


*2.R3 


005366 


005300 








DEC 


RO 


005370 


001352 








BNE 


1* 


005372 


012777 


005432 


004366 




MOV 


«6*.S0HRVEC 


005400 


012777 


000240 


004362 




nov 


*240.aOHRLW. 


005406 


012777 


000100 


004330 




nov 


UOO.SOHSCR 


005414 


012777 


177777 


004334 




nov 


•-1.S0HBAR 


005422 


005067 


172350 






aR 


PS 


005426 


000167 


000076 






JMP 


12 « 



I SET UP TO ESCAPE TO NEXT TEST 

sSET UP TO LOOP WITH DATA ; 3 

(MASTER CLEAR INTERFACE 
;SET UP TO START 16. LINES 
iCOUNT AND BUS ADDRESS MEMORIES 
(AND RECEIVED DATA STORAGE 
(SET UP TO LOAD HIGH BYTE 
(OF EXPECTED DATA 
(LOAD BUSS ADDRESS 

(LOAD BYTE COUNT 
(LOAD BYTE COUNT 



(LOAD BYTE COUNT 



(LOAD BYTE COUNT 

(SET LINE SPEED AND 
ER LENGTH 7 * ODD PARITY 

(CLEAR NEXT RECEIVED CHARACTER 
(LOAD HIGH BYTE 
(ADVANCE TO NEXT LINE 
(UPDATE POINTER TO 
(LOW AND HIGH BYTE OF 
(NEXT EXPECTED CHARACTER 
(CONTINUE IF ALL LINES 
(NOT SET UP 
(SET UP POINTER FOR 
(RECEIVER INTERRUPT 
(ENABLE RECEIVER INTERRUPT 
(SET ALL BAR BITS 
(ENABLE INTERRUPTS 
(GO TO TRANSMITTER WAITING ROUTINE 

(RECEIVER INTERRUPT SERVICE ROUTINE 

(CHECK FOR RECEIVER DONE AND NO ERRORS 

(CHECK RECEIVED DATA FOR "VALID DATA" FLAG AND NO ERRORS 

(VERIFY THAT RECEIVED DATA IS CORRECT 

(CHECK FOR END OF PASS 



005432 105777 004306 61: 

005436 100026 

005440 032777 040000 004276 

005446 001401 

005450 

005450 104002 

005452 017701 004270 7» : 

005456 010102 

005460 000302 

005462 042702 177760 



TSTB SDHSCR 

BPL 101 

BIT «40000.80HSCR 

BEQ . *4 

HLT 2 

EMT 2 

MOV 80HNRC.R1 

MOV R1,R2 

SUAB R2 

BIC #177760. R2 



(IF CHARACTER AVAILABLE NOT SET. ERROR 

(IF SILO OVERRUN SET, ERROR 

(SILO OVERRUN. ERROR 

(READ CHARACTER FROM SILO 
(EXTRACT LINE NUMPER 
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SEQ 45 



005466 
005470 
00547£ 
005476 
005500 
005504 
005504 
005506 
005512 
005514 
005514 
005516 
005520 
005526 



010203 
006302 

026201 012450 
001403 

016205 012450 
104003 

105262 012450 
000002 

104001 
022626 

012777 004000 004216 
000411 



101: 
11*: 



MOV 

ASL 

CMP 

BEQ 

MOV 

HLT 

EMT 

INCB 

RTI 

HLT 

EMT 

P0P2SP 

MOV 

BR 



R2.R3 
R2 

R30rCR25.Kl 
.♦10 

RBUF(R2).R5 

3 

3 

RBUF(R2) 

1 
1 

«6IT11.80HSCR 
131 



iSAVE LINE NUMBER 

:USE LINE NUMBER AS OFFSET 

I COMPARE EXPECTED AND RECEIVED DATA 

;GET EXPECTED DATA 
iDATA ERROR 

J UPDATE EXPECTED CHARACTER 
; CONTINUE 

i CHARACTER AVAILABLE NOT SET. ERROR 

iRESTORE STACK 

{MASTER CLEAR INTERFACE 

J RESTART TEST 



{UAIT FOR ALL BAR BITS TO CLEAR 
WHEN ALL BAR BITS HAVE CLEARED, 
UAIT FOR SILO TO EMPTY 
WHEN SILO IS EMPTY. SCOPE ON TEST 



005530 005777 004222 

005534 001375 

0C5536 105777 004222 

005542 001375 

005544 012767 000340 172224 

005552 104400 
17 005554 



12*: TST 80HBAR 

BNE . -4 

TSTB 80HSLR 

BNE .-4 

MOV *340,PS :PREVENT INTERRUPTS 
13 »: SCOPE ! CHECK FOR ITERATIONS. LOOP 



;UAIT FOR ALL BAR BITS TO CLEAR 
;UAIT FOR SILO TO EMPTY 



SUPERCALIFRIGILISTICEXPEHALIDOSIS 



27322, EVEN. 7 



sMULTI-LINE PARITY DATA TEST 

i TRANSMIT A BINARY COUNT UITH EVEN PARITY 

{PATTERN ON ALL LINES. 

:SILO ALARM LEVEL SET TO 0 

{RECEIVER UILL BE SERVICED ON A PER CHARACTER BASIS 
I IN INTERRUPT MODE. 

iTRANSniTTER INTERRUPT UILL BE DISABLED 
I LINE SPEED: 2400 BAUD 
iCHARACTER LENGTH: 7 • PARITY 



005554 








TS \XN.10.11t 






005554 


012767 


000340 


172214 


T24: 


nov 


•340.PS 


(DISABLE ALL INTERRUPTS 


005562 


012767 


000010 


004222 




nov 


•lO.ICOUNT 


iSET UP FOR 10 ITERATIONS 


005570 


012767 


006022 


004210 




nov 


Mil. ESCAPE 


iSET UP TO ESCAPE TO NEXT TEST 










.IF NB 


<> 
















NOV 


♦.FREEZl 


iSET UP TO LOOP UITH DATA 










.ENDC 










000025 






XN-XN«1 








005576 


012777 


004000 


004140 




MOV 


«BIT11.8DHSCR 


iNASTER CLEAR INTERFACE 


005604 


012700 


000020 






nov 


*16. ,R0 


;SET UP TO START 16. LINES 


005610 


005001 








CLR 


Rl 


{COUNT AND BUS ADDRESS MEMORIES 
















tANO RECEIVED DATA STORAGE 


005612 


012702 


000200 






nov 


*200.R2 


iSET UP Tn LOAD HIGH BYTE 


005616 


012703 


000001 






nov 


«1.RS 


iOF EXPECTED DATA 


005622 


012777 


012050 


004122 


1*: 


nov 


♦TBUF.BOHBA 


iLOAD BUSS ADDRESS 










.IF 


ION 


8.7 














nov 


♦-400.80HBC 


{LOAD BYTE COUNT 










.ENDC 
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SEQ 46 











.Ir 


ION 


7,7 






At 9*r^7 

01Z777 


177O0O 


AAA 4 1 £ 

0O411D 




HOV 


9-200 •8DWC 


{LOAD BYTE COUNT 
























.Ir 


ION 


6,7 














MAW 

nov 




iLOAD BYTE COUNT 


























ION 


5.7 














MAU 

nov 


♦-40.8DHBC 


sLOAO BYTE COUNT 


















01Z777 


02 73ZZ 


AA41 AA 

004104 




MAW 

nov 


«27322.S0HLPR 


sSET LINE SPEED AND 














{CHARACTER LENGTH 7 * EVEN PARITY 




109001 


A1 OACA 

01Z490 






CLKD 


RBUFCRl) 


! CLEAR NEXT RECEIVED CHARACTER 




110209 


A4 9AKA 

01Z430 






MA WD 

novo 


R2.RBUF(R3) 


(LOAD HIGH BYTE 




0092 1 7 


AAAA&A 

0040O# 






INC 


aOHSCR 


(ADVANCE TO NEXT LINE 




AAK9A9 

003202 








INC 


R2 


: UPDATE POINTER TO 




062 rOl 


AAAAA9 

oooooz 






AAA 

MOD 


«2,R1 


:L0U AND HIGH BYTE OF 


ovaeoe 


OOc'OA 


AAAAAO 






AAA 


*2.R3 


(NEXT EXPECTED CHARACTER 


OOse re 


AAKTAA 

009A00 










RO 


: CONTINUE IF ALL LINES 


UU3D r4 


nni K9 








one 


1» 


.-NOT SET UP 


005676 


012777 


005736 


004062 




nov 


•6»,aOHRVEC 


sSET UP POINTER FOR 


005704 


012777 


000240 


004056 




nov 


«240.S0HRLVL 


: RECEIVER INTERRUPT 


005712 


012777 


000100 


004024 




nov 


«100.S0HSCR 


i ENABLE RECEIVER INTERRUPT 


005720 


012777 


177777 


004030 




nov 


*-l.aOHBAR 


jSET ALL BAR BITS 


005726 


005067 


172044 






CLR 


PS 


(ENABLE INTERRUPTS 


005732 


000167 


000076 






jnp 


12 » 


iGO TO TRANSniTTER UAITING ROUTINE 



••RECEIVER INTERRUPT SERVICE ROUTINE 
(CHECK FOR RECEIVER DONE AND NO ERRORS 

(CHECK RECEIVED DATA FOR "VALID DATA" FLAG AND NO ERRORS 
(VERIFY THAT RECEIVED DATA IS CORRECT 
(CHECK FOR END OF PASS 



005736 105777 004002 6»! 

005742 100026 

005744 032777 040000 003772 

005752 001401 

005754 

005754 104002 

005756 017701 003764 7»: 

005762 010102 

005764 000302 

005766 042702 177760 

005772 010203 

005774 006302 

005776 026201 012450 

006002 001403 

006004 016205 012450 

006010 

006010 104003 

006012 105262 012450 

006016 000002 

006020 10 »: 

006020 104001 

006022 022626 11*: 

006024 012777 004000 003712 

006032 000411 



TSTB 

BPL 

BIT 

BEQ 

HLT 

EHT 

nov 
nov 

SUAB 
BIC 

nov 

ASL 
CHP 
BEQ 

nov 

HLT 

EHT 

INCB 

RTI 

HLT 

EHT 

P0P2SP 

nov 

BR 



WHSCR 
10* 

«40000.SDHSCR 
.♦4 

2 
2 

SOHNRC.Rl 

R1.R2 

R2 

♦177760, R2 

R2.R3 

R2 

RBUF(R2).R1 
.♦10 

RBUFCR2).R5 

3 

3 

RBUF(R2) 

1 
1 

8BIT11.80HSCR 
13* 



(IF CHARACTER AVAILABLE NOT SET. ERROR 

(IF SILO OVERRUN SET. ERROR 

(SILO OVERRUN. ERROR 

(READ CHARACTER FROH SILO 
(EXTRACT LINE NUnBER 



(SAVE LINE NUMBER 

(USE LINE NUMBER AS OFFSET 

(COnPARE EXPECTED AND RECEIVED DATA 

(GET EXPECTED DATA 
(DATA ERROR 

(UPDATE EXPECTED CHARACTER 
(CONTINUE 

(CHARACTER AVAILABLE NOT SET. ERROR 

(RESTORE STACK 

{MASTER aEAR INTERFACE 

(RESTART TEST 
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SE4 47 



WAIT FOR ALL BAR BITS TO CLEAR 
UHEN ALL BAR BUS HAVE CLEARED, 
WAIT FOR SILO TO EMPTY 
UHEN SILO IS EMPTY. SCOPE ON TEST 



006034 005777 003716 

006040 001375 

006042 105777 003716 

006046 001375 

006050 012767 000340 171720 

006056 104400 
16 006060 



121: TST a>HBAR 

BNE .-4 

TSTB 8DHSLR 
BNE -4 

MOV #340, PS s PREVENT INTERRUPTS 
131: SCOPE ;CHECK FOR ITERATIONS. LOOP 



sUAIT FOR ALL BAR BITS TO CLEAR 
jUAIT FOR SILO TO EMPTY 



SUPERCALIFRIGILISTICEXPEHALIDOSIS 



27361.000,6 



;MULTI-LINE PARITY DATA TEST 
{TRANSMIT A BINARY COUNT UITH ODD PARITY 
{PATTERN ON ALL LINES. 
:SILO ALARM LEVEL SET TO 0 

(RECEIVER UILL BE SERVICED ON A PER CHARACTER BASIS 
:IN INTERRUPT MODE. 

{TRANSMITTER INTERRUPT UILL BE DISABLED 
{LINE SPEED: 2400 BAUD 
{CHARACTER LENGTH: 6 * PARITY 



006060 








TS \XN.10.11t 






006060 


012767 


000340 


171710 


T25: 


MOV 


#340. PS 


{DISABLE ALL INTERRUPTS 


006066 


012767 


000010 


003716 




MOV 


«10,IC0UNT 


{SET UP FOR 10 ITERATIONS 


006074 


012767 


006326 


003704 




MOV 


•11«, ESCAPE 


{SET UP TO ESCAPE TO NEXT TEST 










.IF N6 


<> 














MOV 


•.FREEZl 


{SET UP TO LOOP UITH DATA 










.ENDC 








000026 






XN>XN«1 








006102 


012777 


004000 


003634 




MOV 


MIT11.80HSCR 


(MASTER CLEAR INTERFACE 


006110 


012700 


000020 






MOV 


#16. .RO 


(SET UP TO START 16. LINES 


006114 


005001 








CLR 


Rl 


(COUNT AND BUS ADDRESS MEMORIES 






000200 










(AND RECEIVED DATA STORAGE 


006116 


012702 






MOV 


6200.R2 


(SET UP TO LOAD HIGH BYTE 


006122 


012703 


000001 






MOV 


•1.R3 


{OF EXPECTED DATA 


006126 


012777 


012050 


003616 


11: 


MOV 


•TBUF.flDHBA 


{LOAD BUSS ADDRESS 










• IF 


ION 


8.6 












MOV 


•-400.8DHBC 


(LOAD BYTE COUNT 










.ENOC 














.IF 


ION 
MOV 


7.6 

*-200.80HBC 


(LOAD BYTE COUNT 










.ENOC 
















.IF 


ION 


6.6 




006134 


012777 


177700 


003612 


.ENOC 
.IF 

.ENOC 


MOV 

ION 
MOV 


t-100.80HBC 

5.6 

«-40.00HBC 


(LOAD BYTE COUNT 
{LOAD BYTE COUNT 


006142 


012777 


027361 


003600 




MOV 


*27361.S0HLPR 


{SET LINE SPEED AND 














{CHARACTER LENGTH 6 * 000 PARITY 


006150 


105061 


012450 






aRB 


RBUF(Rl) 


(CLEAR NEXT RECEIVED CHARACTER 


006154 


110263 


012450 






MOVB 


R2,R6UF(R3) 


{LOAD HIGH BYTE 


006160 


005277 


003560 






INC 


8DHSCR 


{ADVANCE TO NEXT LINE 


006164 


005202 








INC 


R2 


(UPDATE POIN'iER TO 
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Wv A 




WWwC 






A3 D t 


Wv X ( C 




000009 




Ann 






00^300 








RO 












1 < 
X * 


006202 


012777 


006242 


003556 


nov 


46 t aOHRVEC 


006210 


012777 


000240 


003552 


nov 


«24C,9DHRi.VL 


006216 


012777 


000100 


003520 


nov 


4100.00HSCR 


006224 


012777 


177777 


003524 


nov 


«-l.«>HBAR 


006232 


005067 


171540 




CLR 


PS 


006236 


000167 


000076 




jnp 


12 » 



LOW ANT HIGH BYTE OF 
NEXT EXPECTED CHARACTER 
CONTINUE IF ALL LINES 
NUT SET UP 
SET UP POINTER FOR 
RECEIVER INTERRUPT 
ENABLE RECEIVER INTERRUPT 
SET ALL BAR BITS 
ENABLE INTERRUPTS 
GO TO TRANSMITTER WAITING ROUTINE 

{RECEIVER INTERRUPT SERVICE ROUTINE 
iCHECK FOR RECEIVER DONE AND NO ERRORS 

iCHECK RECEIVED DATA FOR "VALID DATA" FLAG AND NO ERRORS 
: VERIFY THAT RbCEIVEO DATA IS CORRECT 
iCHECK FOR END OF PASS 



006242 
006246 
006250 
006256 
006260 
006260 
0C6262 
006266 
006270 
006272 
006276 
006S00 
006302 
006S06 
006310 
006314 
006314 
006316 
006322 
006324 
006324 
006326 
006330 
006336 



105777 003476 
100026 

032777 040000 003466 
001401 

104002 

017701 003460 

010102 

000302 

042702 177760 

010203 

006302 

026201 012450 
001403 

016205 012450 
104003 

105262 012450 
000002 

104001 
022626 

012777 004000 003406 
000411 



6$: 



7»! 



10$: 
111: 



TSTB 

BPL 

BIT 

BEQ 

HLT 

EMT 

NOV 

NOV 

SUAE 

BIG 

NOV 

ASL 

CMP 

BEQ 

MOV 

HLT 

EMT 

INCB 

RTI 

HLT 

EMT 

P0P2SP 

MOV 

BR 



aOHSCR 
101 

440000. 8DHSCR 
.♦4 

2 
2 

flDHNRC.Rl 

R1.R2 

R2 

4177760, R2 

R2.R3 

R2 

RBUF(R2).R1 
.*10 

RBUF(R2).R5 

3 

3 

RBUF(R2) 

1 
1 

4BIT11.S0HSCR 
13 « 



tIF CHARACTER AVAILABLE NOT SE1 . ERROR 

;IF SILO OVERRUN SET. ERROR 

sSILO OVERRUN. ERROR 

{READ CHARACTER FROM SILO 
i EXTRACT LINE NUMBER 



I SAVE LINE NUMBER 

iUSE LINE NUMBER AS OFFSET 

i COMPARE EXPECTED AND RECEIVED DATA 

iGET EXPECTED DATA 
I DATA ERROR 

i UPDATE EXPECTED CHARACTER 
{CONTINUE 

i CHARACTER AVAILABLE NOT SET. ERROR 

(RESTORE STACK 

{MASTER CLEAR INTERFACE 

{RESTART TEST 



006340 
006344 
006346 
006352 
006354 
006362 
19 006364 



005777 
001375 
105777 
001375 
012767 
104400 



003412 
003412 

000340 171414 



12$: 



(UAIT FOR ALL BAR BITS TO CLEAR 
(UHEN ALL BAR BITS HAVE CLEARED. 
lUAIT FOR SILO TO EMPTY 
iUHEN SILO IS EMPTY. SCOPE ON TEST 



flOHBAR 
.-4 

80HSLR 
.-4 

•340. PS 



(UAIT FOR ALL BAR BITS TO CLEAR 



{UAIT FOR SILO TO EMPTY 



TST 
BNE 
TSTB 
BNE 

NOV 4340. PS {PREVENT INTERRUPTS 
13*: SCOPE {CHECK FOR ITERATIONS. 

SUPERCALIFRIGILISTICEXPEHALIDOSIS 27321 . EVEN.6 



LOOP 



{MULTI-LINE PARITY DATA TEST 
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SEQ 49 



{TRANSMIT A BINARY COUNT WITH EVEN PARITY 
{PATTERN ON ALL LINES. 
:SILO ALARM LEVEL SET TO 0 

{RECEIVER WILL BE SERVICED ON A PcR CHARACTER BASIS 
:IN INTERRUPT MODE. 

(TRANSMITTER INTERRUPT WILL CE DISABLED 
iLINE SPEED: 2400 BAUD 
{CHARACTER LENGTH: 6 * PARITY 



006364 








TS NXN.lO.llI 






006364 


^^^^ 

012767 


000340 


4^44 Ail 

171404 


T26: 


MOV 


4340 1 PS 


{DISABLE ALL INTERRUPTS 


006372 


012767 


000010 


AAV4 4 

003412 




MOV 


410,IC0UNT 


(SET UP FOR 10 ITERATIONS 


006400 


/\t ^^^^ 

012767 


006632 


AA Vii AA 

003400 




MOV 


4111 .ESCAPE 


{SET UP TO ESCAPE TO NEXT TEST 










.IF NB 


< > 














MOV 


A CDCC7i 


{SET UP TO LOOP WITH DATA 










.ENDC 














XN-XN*1 








006406 


012777 


004000 


003330 




MOV 


•8IT11.SDHSCR 


{MASTER CLEhR INTERFACE 


006414 


012700 


000020 






MOV 


416..R0 


{SET UP TO START 16. LINES 


006420 


005001 








CLR 


Rl 


{COUNT AND BUS ADDRESS MEMORIES 
{AND RECEIVED DATA STORAGE 












MOV 


A9nn 09 


{Sbl Ur 10 LOAD Hlbn BYTE 


006426 


012703 


000001 






nuv 


*1,R3 


{OF EXPECTED DATA 




<>1 9777 
vXc III 






1* : 
• ir 


nuv 

lUN 


ATRIir onuRA 
VI DvT « VUnDn 

Of D 


.1 nAn Di ICC Aimoccc 












Mnu 
nuv 


A.Ann onuRr 


.1 nAn DVTir f^m ikiT 
{LUnU DTIt Luurii 










Punr 














TC 

. xr 


















Mnu 
nuv 


*.9nn oriMRr 


• 1 nAn RVTP rniiuT 
























TC 

.if 




D « D 






M 9777 
vXc III 


177700 

L 1 1 1 W 




TC 

• Ir 


nuv 

XUN 

Mnu 


A. inn flOMRr 
A. An afHtftr 


• 1 nAn RVTc pmiMT 
{LUnU DTIC Luuni 

• 1 nAn RvTP pfuiiiT 

tLUnU pile tUUNI 




019777 

VXC III 


097^91 






MOV 


A97391 BfMI PR 

{CHARACTER 


•CPT 1 TMP COPFn Aun 
{OCI LXnC drbCU nf%\3 

LENGTH 6 * EVEN PARITY 


006454 


105061 


012450 






CLRB 


RBUF(Rl) 


(CLEAR NEXT RECEIVED CHARACTER 


006460 


110263 


012450 






MOVB 


R2.RBUF(R3) 


(LOAD HIGH BYTE 


006464 


005277 


003254 






INC 


80HSCR 


(ADVANCE TO NEXT LINE 


006470 


005202 








INC 


R2 


(UPDATE POINTER TO 


006472 


062701 


000002 






ADO 


•2.R1 


(LOU AND HIGH BYTE OF 


0C6476 


062703 


000002 






ADO 


•2.R3 


(NEXT EXPECTED CHARACTER 


006502 


005300 








DEC 


RO 


(CONTINUE IF ALL LINES 


006504 


001352 








BNE 


11 


(NOT SET UP 


006506 


012777 


006546 


003252 




MOV 


46I.80HRVEC 


(SET UP POINTER FOR 


006514 


012777 


000240 


003246 




MOV 


4240.80HRLVL 


(RECEIVER INTERRUPT 


006522 


012777 


000100 


003214 




MOV 


4100.8DHSCR 


(ENABLE RECEIVER INTERRUPT 


006530 


012777 


177777 


003220 




MOV 


4-1.80HBAR 


(SET ALL BAR BITS 


006536 


005067 


171234 






CLR 


PS 


(ENABLE INTERRUPTS 


006542 


000167 


000076 






jnp 


121 


(GO TO TRANSMITTER WAITING ROUTINE 



(RECEIVER INTERRUPT SERVICE ROUTINE 

(CHECK FOR RECEIVER DONE AND NO ERRORS 

{CHECK RECEIVED DATA FOR "VALID DATA' FLAG AND NO ERRORS 

(VERIFY THAT RECEIVED DATA IS CORRECT 
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SEQ SO 



t CHECK FOR END OF PASS 



006546 
006552 
006554 
006562 
006564 
006564 
006566 
006572 
006574 
006576 
006602 
006604 
006606 
006612 
006614 
006620 
006620 
006622 
006626 
006630 
006630 
006632 
006634 



105777 003172 
100026 

032777 040000 003162 
001401 



104002 
017701 
010102 
000302 
042702 
010203 
006302 
026201 
001403 
016205 

104003 
105262 
000002 



003154 

177760 

012450 
012450 

012450 



6«: 



7»: 



104001 
022626 

012777 004000 003102 



10*: 
111: 



006642 000411 



TSTB 

BPL 

BIT 

BEQ 

HLT 

EMT 

HOV 

MOV 

SUAB 

BIC 

MOV 

ASL 

CMP 

BEQ 

MOV 

HLT 

EMT 

ZNCB 

RTI 

HLT 

EMT 

P0P2SP 

MOV 

BR 



«>HSCR 
10* 

•40000, BDHSCR 
.♦4 

2 
2 

SOHNRC.Rl 
R1,R2 

R2 

♦177760. R2 

R2.R3 

R2 

RBUF(R2).R1 
.♦10 

RBUF(R2).RS 

3 

3 

RBUF(R2) 

1 
1 

«6ITll.aOHSCR 
13* 



iZF CHARACTER AVAILABLE NOT SET, ERROR 

tIF SILO OVERRUN SET, ERROR 

iSILO OVERRUN. ERROR 

sREAD CHARACTER FROM SILO 
s EXTRACT LINE NUMBER 



:SAVE LINE NUMBER 

aUSE LINE NUMBER AS OFFSET 

{COMPARE EXPECTED AND RECEIVED DATA 

J GET EXPECTED DATA 
sDATA ERROR 

: UPDATE EXPECTED CHARACTER 
: CONTINUE 

(CHARACTER AVAILABLE NOT SET. ERROR 

{RESTORE STACK 

{MASTER CLEAR INTERFACE 

{RESTART TEST 



006644 005777 003106 

006650 001375 

006652 105777 003106 

00665C 001375 

006660 012767 000340 171110 

006666 104400 
20 006670 



(WAIT FOR ALL BAR BITS TO CLEAR 
{WHEN ALL BAR BITS HAVE CLEARED. 
{WAIT FOR SILO TO EMPTY 
(WHEN SILO IS EMPTY. SCOPE ON TEST 



121: TST OHCAR 

BNE -4 

TSTB 80HSLR 

BNE .-4 

MOV •340. PS {PREVENT INTERRUPTS 
131: SCOPE iCHECK FOR ITERATIONS. LOOP 



{WAIT FOR ALL BAR BITS TO CLEAR 
(WAIT FOR SILO TO EMPTY 



SUPERCALIFRI6ILISTICEXPEHALID0SIS 



27360. ODD. 5 



{MULTI-LINE MRITY DATA TEST 
{TRANSHZT A BINARY COUNT UITH ODD PARITY 
{PATTERN ON ALL LINES. 
{SILO ALARM LEVEL SET TO 0 

{RECEIVER ULL BE SERVICED ON A PER CHARACTER BASIS 
{IN INTERRUPT NODE. 

{TRANSMITTER INTERRUPT WILL BE DISABLED 
{LINE SPEED: 2400 BAUD 
{CHARACTER LENGTH: 5 * PARITY 



C06670 

006670 012767 000340 171100 

006676 012767 000010 003106 

006704 012767 007136 003074 



TS \XN.10.11I 
T27: MOV 
MOV 
MOV 
.IF NB <> 
MOV 



•340. PS 
•lO.ICOUNT 
•111 .ESCAPE 

•.FREEZl 



{DISABLE ALL INTERRUPTS 
iSET UP FOR 10 ITERATIONS 
{SET UP TO ESCAPE TO NEXT TEST 

{SET UP TO LOOP UITH DATA 
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SEQ 51 



000030 



.ENOC 
XN-XN*1 



006712 


012777 


004000 


003024 




nov 


•eiTll.SOHSCR 


: MASTER CLEAR INTrRFACE 


006720 


012700 


000020 






nov 


*16. .RO 


:SET UP TO START 16. LINES 


006724 


005001 








CLR 


Rl 


t COUNT AND BUS AOORESS MEMORIES 
lANO RECEIVED DATA STORAGE 


006726 


012702 


0C0200 






nov 


♦200. R2 


{SET UP TO LOAD HIGH BYTE 


006732 


012703 


000001 






nov 


*1.R3 


iOF EXPECTED DATA 


006736 


012777 


012050 


003006 


11: 


nov 


«TBUF.80HBA 


iLOAD BUSS ADDRESS 










.IF 


ION 


8.5 












nov 


«-400.80HBC 


;LOAD BYTE COUNT 










.ENOC 














.IF 


ION 

nov 


7.5 

♦-200.80HBC 


(LOAD BYTE COUNT 










.ENOC 
















.IF 


ION 


6.5 














nov 


«-100.80HBC 


:LOAD BYTE COUNT 










.ENOC 














.IF 


ION 


5.5 




006744 


012777 


177740 


003002 




nov 


«-40.8DH8C 


iLOAD BYTE COUNT 










.ENOC 






006752 


012777 


027360 


002770 




nov 


♦27360.SOHLPR 

(CHARACTER 


iSET LINE SPEED AND 
LENGTH 5 * ODD PARITY 


006760 


105061 


012450 






CLRe 


RBUF(Rl) 


s CLEAR NEXT RECEIVED CHARACTER 


006764 


110263 


012450 






novB 


R2.RBUF(R3> 


iLOAO HIGH BYTE 


006770 


005277 


002750 






INC 


KHSCR 


t ADVANCE TO NEXT LINE 


006774 


005202 








INC 


R2 


i UPDATE POINTER TO 


006776 


062701 


000002 






ADD 


«2.R1 


iLOU AND HIGH BYTE OF 


007002 


062703 


000002 






AOO 


#2.R3 


iNEXT EXPECTED CHARACTER 


007006 


005300 








OEC 


RO 


(CONTINUE IF ALL LINES 


007010 


001352 








BNE 


11 


(NOT SET UP 


007012 


012777 


007052 


002746 




nov 


«6l.a)HRVEC 


iSET UP POINTER FOR 


007020 


012777 


000240 


002742 




nov 


•e40.80HRLVL 


(RECEIVER INTERRUPT 


007026 


012777 


000100 


002710 




nov 


«i00.80HSCR 


(ENABLE RECEIVER INTERRUPT 


007034 


012777 


177777 


002714 




nov 


#-1.8DHBAR 


(SET ALL BAR BITS 


007042 


005067 


170730 






an 


PS 


(ENABLE INTERRUPTS 


007046 


000167 


000076 






jnp 


121 


(GO TO TRANSmnER WAITING ROUTINE 



(RECEIVER INTERRUPT SERVICE ROUTINE 

(CHECK FOR RECEIVER DONE AND NO ERRORS 

(CHECK RECEIVED DATA FOR 'VALID DATA' FLAG AND NO ERRORS 

(VERIFY THAT RECEIVED DATA IS CORRECT 

(CHECK FOR END OF PASS 



007052 


105777 


002666 


6t: 


TSTB 


WHSCR 


007056 


100026 






BPL 


101 


007060 


032777 


040000 002656 




BIT 


«40000,80HSCR 


007066 


001401 






BEQ 


.*4 


007070 








HIT 


2 


007070 


104002 






EHT 


2 


007072 


017701 


002650 


7»: 


nov 


KHNRC.Rl 


007076 


010102 






nov 


R1.R2 


007100 


000302 






SUAB 


R2 


007102 


042702 


177760 




BIC 


•177760. R2 


007106 


010203 






nov 


R2.R3 


007110 


006302 






ASL 


R2 


007112 


026201 


012450 




CHP 


RBUF(R2>,R1 



(IF CHARACTER AVAILABLE NOT SET. ERROR 

(IF SILO OVERRUN SET. ERROR 

(SILO OVERRUN. ERROR 

(READ CHARACTER FROH SILO 
(EXTRACT LINE NUHBER 



(SAVE LINE NUMBER 

(USE LINE NUMBER AS OFFSET 

(COMPARE EXPECTED AND RECEIVED DATA 
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007116 001403 

007120 016205 012450 

007124 

007124 104003 

007126 105262 012450 

007132 000002 
007134 

007134 104001 

007136 022626 

007140 012777 004000 002576 

007146 000411 



101: 
111: 



BEQ 

HOV 

HLT 

EMT 

INCB 

RTZ 

HLT 

ENT 

P0P2SP 

HOV 

BR 



.*10 

RBUF(R2).R5 

3 

3 

RBUFCR.?) 

1 
1 

4BIT11.80HSCR 
131 



(GET EXPECTED DATA 
I DATA ERROR 

t UPDATE EXPECTED CHARACTER 
I CONTINUE 

{CHARACTER AVAILABLE NOT SET. ERROR 

iRESTORE STACK 

iHASTER aEAR INTERFACE 

•RESTART TEST 



lUAIT FOR ALL BAR BITS TO CLEAR 
lUHEN ALL BAR BITS HAVE aEAREO. 
lUAIT FOR SILO TO ENPTY 
lUHEN SILO IS ENPTY. SCOPE ON TEST 



007150 005777 002602 

007154 001375 

007156 105777 002602 

007162 001375 

007164 012767 000340 170604 

007172 104400 
21 007174 



121: TST SDHBAR 

BNE .-4 

TSTB 80HSLR 

BNE • -4 

HOV •340. PS iPREVENT INTERRUPTS 
13«: SCOPE iCHECK FOR ITERATIONS. LOOP 



lUAIT FOR ALL BAR BITS TO CLEAR 
lUAIT FOR SILO TO ENPTY 



SUPERCALZFRI6XLISTICEXPEHM.ID0SIS 



27320.EVEN.5 



007174 
007174 
007202 
007210 



iNULTI-LINE PARITY DATA TEST 

I TRANSMIT A BINARY COUNT KITH EVEN PARITY 

tPATTCRN ON ALL UNES. 

tSILO ALARM LEVEL SET TO 0 

{RECEIVER Wia BE SERVICED ON A PER CHARACTER BASIS 
I IN INTERRUPT NOOC. 

iTRANSHinER INTEMKiPT UJLL BE DISABLED 
iLINE SPEED: 2400 BAUD 
iCHARACTER LENGTMs 5 ♦ PARITY 



012767 000340 170574 
012767 000010 002602 
012767 007442 002570 



TS \XN.10.11« 
TSO: HOV 
NOV 
HOV 
.IF NB <> 
NOV 

.ENDC 



•340.PS 

MO.ICOUNT 
.ESCAPE 

•.FREEZl 



•DISABLE ALL INTEMtUPTS 
iSET UP FOR 10 ITERAnONS 
iSET UP TO ESCtlPt TO NEXT TEST 

I SET UP TO LOOP UITH DATA 





000031 






XN'XN^l 








007216 


012 V77 


004000 


002520 




HOV 


iilTll.BOHSCR 


iHASTER aEAR INTERFACE 


007224 


01S700 


000020 






HOV 


•16. .NO 


1 SET UP TO START 16. LINES 


007230 


OOtOOl 








aR 


Rl 


iCOUNT AND BUS ADDRESS HEHORIES 
















iAND RECaVCD DATA STORAGE 


007232 


012702 


000200 






HOV 


•200. R2 


t SET UP TO LOAD HIGH BYTE 


007236 


012703 


000001 






HOV 


•l.RS 


tOF EXPECTED DATA 


007242 


C/12777 


012050 


002502 


1«: 


HOV 


•T8UF.«)»«A 












.IF 


ION 


B.5 














HOV 


•-4oo.m«c 


iLOAO BYTE COUNT 










.ENDC 
















.IF 


ION 


7.5 














HOV 


•-aoo.ttwc 


iLOAO BYTE COUNT 










.ENDC 
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SEQ 53 











IF 


IDN 


6.5 














MOV 


♦-lOO.SOHBC 


iLOAD BYTE COUNT 










.ENOC 














.If 


IDN 


5,5 




0072S0 


012777 


177740 


002476 




MOV 


♦-40.BDH6C 


iLOAD BYTE COUNT 










.ENOC 






007256 


012777 


027320 


002464 




MOV 


♦27320. SDHLPR 

{CHARACTER 


iSET LINE SPEED AND 
LENGTH 5 * EVEN PARITY 


007264 


105061 


012450 






CLRB 


RBUF(Rl) 


i CLEAR NEXT RECEIVED CHARACTER 


007270 


110263 


012450 






MOVB 


R2.RBUF(R3) 


iLOAD HIGH BYTE 


007274 


005277 


002444 






INC 


80HSCR 


{ADVANCE TO NEXT LINE 


007300 


005202 








INC 


R2 


{UPDATE POINTER TO 


007302 


062701 


000002 






ADO 


«2.R1 


(LOU AND HIGH BYTE OF 


007306 


062703 


000002 






AOO 


«2.R3 


(NEXT EXPECTED CHARACTER 


007312 


005300 








DEC 


RO 


(CONTINUE IF ALL LINES 


007314 


001352 








BNE 


1« 


(NOT SET UP 


007316 


012777 


007356 


002442 




MOV 


•6I.80HRVEC 


(SET UP POINTER FOR 


007324 


012777 


000240 


002436 




MOV 


«240.S0HRLVL 


(RECEIVER INTERRUPT 


007332 


012777 


000100 


002404 




MOV 


♦lOO.SOHSCR 


(ENABLE RECEIVER INTERRUPT 


007340 


012777 


177777 


002410 




MOV 


♦-l.SOHBAP 


(SET ALL BAR BITS 


007346 


005067 


170424 






CLR 


PS 


(ENABLE INTERRUPTS 


C073S2 


000167 


000076 






JHP 


12* 


(GO TO TRANSMITTER WAITING ROUTINE 



007356 
007362 
007364 
007372 
007374 
007374 
007376 
007402 
007404 
007406 
007412 
007414 
007416 
007422 
007424 
007430 
007430 
007432 
007436 
007440 
007440 
007442 
007444 
007452 



(RECEIVER INTERRUPT SERVICE ROUTINE 
(CHECK FOR RECEIVER DONE AND NO ERRORS 

(CHECK RECEIVED DATA FOR "VALID DATA" FLAG AND NO ERRORS 
(VERIFY THAT RECEIVED DATA IS CORRECT 
(CHECK FOR END OF PASS 



105777 002362 
100026 

032777 040000 002352 
001401 

104002 

017701 002344 

010102 

000302 

042702 177760 

010203 

006302 

026201 012450 
001403 

016205 012450 
104003 

105262 012450 
000002 

104001 
022626 

012777 004000 002272 
000411 



61: 



7»! 



101: 
111: 



TST8 

BPL 

BIT 

BEQ 

HIT 

EMT 

MOV 

nov 
syAB 

BIC 

nov 

ASL 

CMP 

BEQ 

MOV 

HLT 

EMT 

INCB 

RTI 

HLT 

EMT 

P0P2SP 

MOV 

BR 



80HSCP 
101 

•40000. SOHSCR 
.♦4 

2 
2 

MMNRC.Rl 

R1.R2 

R2 

•1 /7760.R2 

R2.R3 

R2 

RBUF(R2),R1 
.♦10 

R6UF(R2).R5 

3 

3 

R6UF(R2) 

1 
1 

•6IT11.SDHSCR 
131 



(IF CHARACTER AVAILABLE NOT SET. ERROR 

;IF SILO OVERRUN SET. ERROR 

iSILO OVERRUN. ERROR 

(READ CHARACTER FROM SILO 
(EXTRACT Lire NUMBER 



(SAVE LINE NUMBER 

sUSE LINE NUMBER AS OFFSET 

(COMPARE EXPECTED AND RECEIVED DATA 

(GET EXPECTED DATA 
(DATA ERROR 

(UPDATE EXPECTED CHARACTER 
(CONTINUE 

(CHARACTER AVAILABLE NOT SET. ERROR 

(RESTORE STACK 

(MASTER CLEAR INTERFACF 

(RESTART TEST 



(UAIT FOR ALL BAR BITS TO CLEAR 
sUHEN ALL BAR BITS HAVE CLEARED. 
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SEO 54 



lUAIT FOR SILO TO EMPTY 

:UHEN SILO IS EMPTY. SCOPE ON TEST 



00 7454 0057 77 002276 

007460 001375 

007462 105777 002276 

007466 001375 

007470 012767 000340 

007476 104400 



170300 



12$: 



131: 



TST 80HBAR 

BNE . -4 

TSTB 80HSLR 

BNE . -4 

MOV ♦340, PS iPREVENT INTERRUPTS 



jUAIT FOR ALL BAR BITS TO CLEAR 
jUAIT FOR SILO TO EMPTY 



SCOPE 



;CHECK FOR ITERATIONS, LOOP 
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SEQ 55 



1 
2 
3 
4 
5 
6 
7 
8 
9 
10 



iMULTI LINE DATA TEST 

I SILO ALARM LEVEL SET TO 0 

iRECEIVER WILL BE SERVICED ON A PER CHARACTER BASIS 
ilN INTERRUPT MODE 

I TRANSMITTER INTERRUPTS UILL BE DISABLED 
{TRANSMIT A BINARY COUNT PATTERN ON ALL LINFS 
;LINE SPEED IS 4800 BAUD FOR ALL LINES 
(CHARACTER LENGTH IS 8 BITS FOR ALL LINES 



11 


007500 










007500 


012767 


000340 

WWW 


170270 




007506 


012767 

VAC ' V ' 


000010 


002276 




007514 


012767 


007746 


002264 






000032 






12 


007522 


012777 


004000 


002214 


13 


007530 


012700 


000020 




14 


007534 


005001 






IS 










16 


0C7536 


012702 


000200 




17 


0C7542 


012703 


000001 




18 007546 


012777 


012050 


002176 


19 


007554 


012777 


177400 


002172 


20 


007562 


012777 


031403 


002160 


21 










22 


007570 


105061 


012450 




23 


007574 


110263 


012450 




24 


007600 


005277 


002140 




25 


007604 


005202 






26 


007606 


062701 


000002 




27 


007612 


062703 


000002 




28 


007616 


005300 






29 


007620 


001352 






30 


007622 


012777 


007662 


002136 


31 


007630 


012777 


000240 


002132 


32 


007636 


012777 


000100 


002100 


33 


007644 


012777 


177777 


002104 


34 


007652 


005067 


170120 




35 


007656 


000167 


000076 




36 










37 










38 










39 










40 










41 










42 










43 


007662 


105777 


002056 




44 


007666 


100026 






45 


007670 


032777 


040000 


002046 


46 


007676 


001401 






47 


007700 










007700 


104002 






48 


007702 


017701 


002040 




49 


007706 


010102 







TS \XN.10.11$ 
T31: MOV 
MOV 
MOV 
.IF NB <> 
MOV 

.ENDC 
XN-XN*1 



«340.PS 
•lO.ICOUNT 
«11). ESCAPE 

«.FREEZ1 



{DISABLE ALL INTERRUPTS 
iSET UP FOR 10 ITERATIONS 
sSET UP TO ESCAPE TO NEXT TEST 

{SET UP TO LOOP WITH DATA 



1): 



6)! 



71 1 



MASTER CLEAR INTERFACE 
SET UP TO LOAD B^TE 
COUNT AND BUS ADDRESS MEMORIES 
AND RECEIVED DATA STORAGE 
SET UP TO LOAD HIGH BYTE 
{OF EXPECTED DATA 
LOAD BUSS ADDRESS 
LOAD BYTE COUNT 
SET LINE SPEED AND 
CHARACTER LENGTH 
CLEAR NEXT RECEIVED CHARACTER 
LOAD HIGH BYTE 
ADVANCE TO NEXT LINE 
UPDATE POINTER TO 
LOW AND HIG BYTE OF 
NEXT EXPECTED CHARACTER 
{CONTINUE IF ALL LINES 
NOT SET UP 
SET UP POINTER FOR 
RECEIVER INTERRUPT 
ENABLE INTERFACE 
{SET ALL BAR BITS 
(ENABLE INTERRUPTS 
{GO TO TRANSMITTER WAITING ROUTINE 

(RECEIVER INTERRUPT SERVICE ROUTINE 
(CHECK FOR RECEIVER DONE AND NO ERRORS 

(CHECK RECEIVED DATA FOR "VALID DATA" FLAG AND NO ERRORS 
(VERIFY THAT RECEIVED DATA IS CORRECT 
(CHECK FOR END OF PASS 



MOV 


«eiTll,8DHSCR 


MOV 


«2O,R0 


CLR 


Rl 


MOV 


♦200.R2 


MOV 


«1.R3 


MOV 


«TBUF.80HBA 


MOV 


«-400,80HBC 


MOV 


«31403.80HLPR 


CLRB 


RBUF(Rl) 


M0V8 


R2.RBUF(R3} 


INC 


8DHSCR 


INC 


R2 


ADD 


«2.R1 


ADD 


«2.R3 


DEC 


RO 


BNE 


1* 


MOV 


«6I.8DHRVEC 


MOV 


♦240.80HRLVL 


MOV 


«100.S0HSCR 


MOV 


«-l.a)HBAR 


CLR 


PS 


JHP 


121 



TSTB 8DHSCR 

BPL 10* 

BIT «40000.80HSCR 

BEQ . *4 

HLT 2 

EMT 2 

MOV 80HNRC.R1 

MOV R1,R2 



(IF CHARACTER AVAILABLE NOT SET. ERRA*^ 

(IF SILO OVERRUN SET. ERROR 

:SILO OVERRUN. ERROR 

(READ CHARACTER FORM SILO 
{EXTRACT LINE NUMBER 
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SEQ 56 





Vw f i A V 








00771P 
W f ( xc 




1 777IU) 

Lilt VV 


52 


007716 


010203 






007730 








007753 








00779A 
\n/ * f Co 






56 


007730 


016205 


012450 




007734 
007734 








007736 


XV JCwC 


01 9A50 




007742 


000002 




60 




Xv^vvX 




61 








62 


007750 


01P777 


004000 


63 


007756 


00O406 




64 








65 








66 








67 








68 








69 








70 








-1 


0C7760 


005777 


001772 


72 


007764 


001375 




73 


007766 


105777 


001772 


74 


007772 


001375 




75 


007774 


104400 





10$: 
11): 



12«: 



131: 





Me 




»X ' 1 fOU 1 Ke 


nuv 


D3 DT 

Ke 




He 




KD'Jr I Kc J > Kx 


Dew 




Mnu 
nuv 


nDUr ine J , K9 


Ml T 


o 


PMT 

cn 1 




TMrR 

xncD 




n I X 




HLT 


1 


EMT 


1 


P0P2SP 




MOV 


«eiT11.8DHS 


BR 


13) 



{SAVE LINE NUMBER 

sUSE LINE NUMBER AS OFFSET 

{COMPARE EXPECTED AND RECEIVED DATA 

;GET EXPECTED DATA 
;DATA ERROR 

{UPDATE EXPECTED CHARACTER 
{CONTINUE 

(CHARACTER AVAILABLE NOT SET. ERROR 

{RESTORE STACK 

{MASTER CLEAR INTERFACE 

{RESTART TEST 



(UAIT FOR ALL BAR BITS TO CLEAR 
{UHEN ALL BA^ BITS HAVE CLEARED. 
tUAIT FOR SILO TO EMPTY 
iUHEN SILO IS EMPTY. SCOPE ON TEST 



TST aOHBAR 

BNE . -4 

TSTB 80HSLR 

BNE .-4 
SCOPE 



iUAIT FOR ALL BAR BITS TO CLEAR 
{UAIT FOR SIuO TO EMPTY 
{CHECK FOR ITERATIONS, LOOP 
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SEQ 57 



1 
2 
3 
4 
5 
6 
7 
8 
9 



10 


007776 








TS 




007776 


012767 


000340 


167772 


T32 




010004 


012767 


000012 


002000 






010012 


012767 


010344 


001766 














.IF 












.EM 






000033 






XN- 


11 


010020 


012777 


004000 


001716 




12 


010026 


012700 


000020 






13 


010032 


005001 








14 












IS 


010034 


012702 


000200 






16 


010040 


012703 


000001 






17 


010044 


012777 


012050 


001700 


1*: 


18 


010052 


012777 


177400 


001674 




19 010060 


012777 


033503 


001662 




20 












21 


010066 


103061 


012450 






22 


010072 


110263 


012450 






23 


010076 


005277 


001642 






24 


010102 


005202 








25 


010104 


062701 


000002 






26 


010110 


062703 


000002 






27 


010114 


005300 








28 


010116 


001352 








29 


010120 


012777 


010210 


001644 




30 


010126 


012777 


000240 


001640 




31 


010134 


012777 


010222 


001624 




32 


010142 


012777 


000240 


001620 




33 


010150 


012700 


000012 






34 


010154 


005067 


001664 






35 












36 


010160 


012777 


000077 


001574 




37 


010166 


012777 


030000 


001550 




38 


010174 


012777 


177777 


001554 




39 


010202 


005067 


167570 






40 


010206 


000421 








41 












42 












43 












44 












45 


010210 


005777 


001530 




2): 


46 


010214 


100401 








47 


010216 












010216 


104004 








48 


010220 


000002 








49 













iMULTI-LINE DATA TEST 

J TRANSMIT A BINARY COUNT COUNT PATTERN ON ALLL LINES 
:LINE SPr.ED IS 9600 BAUD 

;SIL0 »' ARM LEVEL IS SET TO 63 (NO RECEIVER DONE 
t INTERRUPT" MILL OCCUR) 

» CONTINUOUSLY ATTEMPT TO READ DATA FROM SILO 
»IF "VALID DATA" FLAG IS DETECTED, 
iTHE DATA WILL BE CHECKED 
.12,8) 



MOV 

MOV 

MOV 

<> 

MOV 



«340.PS 
«12,IC0UNT 
«8*. ESCAPE 

«,FREEZ1 



MOV «6IT11.8DHSCR 

MOV «20.R0 

CLR Rl 

MOV «200,R2 

MOV ♦1,R3 

MOV «TBUF.80HBA 

MOV «-400.80HBC 

MOV «33503,80HLPR 

CLR6 RBUFCRl) 

MOVB R2,RBUr(R3) 

INC 0DHSCR 

INC R2 

AOO «2,Ri 

AOO «2,R3 

DEC RO 

BNE II 

MOV *2t.80HTVEC 

MOV «240,S0HTLVL 

MOV «6».80KRVEC 

MOV *240,80HRLVL 

MOV *12,R0 

CLR ENDFLG 

MOV ♦77,80HSSR 

MOV «3OOOO,S0HSCR 

MOV «-l,80HBAR 

CLR PS 

BR 71 



jDISABLE ALL INTERRUPTS 

:SET UP FOR 12 xTERATIONS 

I SET UP TO ESCAPE TO NEXT TEST 

sSET UP TO LOOP WITH DATA 



t MASTER CLEAR INTERFACE 

;SET UP TO LOAD BYTE 

: COUNT AM) BUS ADDRESS MEMORIES 

{AND RECEIVED DATA STORAGE 

iSET UP TO LOAD HIGH BYTE 

;0F EXPECTED DATA 

LOAD BUSS ADDRESS 

LOAD BYTE COUNT 

SET LINE SPEED AND 

CHARACTER uENGTH 

CLEAR NEXT RECEIVED CHARACTER 

LOAD HIGH BYTE 

ADVANCE TO NEXT LINE 

UPDATE POINTER TO 

LOW AND HIGH BYTE Or 

NEXT EXPECTED CHARACTER 

CONTINUE IF ALL LINES 

NOT SET UP 

SET UP POINTER FOR 

TRANSMITTER INTERRUPT 

SET UP POINTER FOR 
(RECEIVER INTERRUPT 

SET UP TO TRANSMIT 

10 (DEOIMAL) BLOCKS OF DATA 

ON EACH LINE 

: ENABLE INTERFACE 

:SET ALL BAR BITS 

; ENABLE INTERRUPTS 

{TRANSFER TO RECEIVER SERVICE 



! TRANSMITTER INTEPRUPT SERVICE ROUTINE 
i CHECK FOR TRANSMIT DONE AND NO ERRORS 



TST 
BMI 
HLT 
EMT 
RTI 



SOHSCR 
.*4 
4 
4 



;IS TRANSMITTER DONE SET 

: TRANSMIT DONE NOT SET, ERROR 

:RETURN 
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SEQ 58 



50 
51 

52 010222 

53 010226 

54 0102S0 
010230 

55 010232 

56 010240 

57 010242 
010242 

56 010244 
59 010246 
010246 

60 

61 010250 

62 

63 

64 

65 

66 

67 

68 0102S2 

69 010256 

70 010260 

71 010262 

72 010264 

73 010266 

74 010272 

75 010274 

76 010276 

77 010302 

78 010304 

79 010310 
010310 
010312 

81 010316 

82 010320 

83 010324 

84 010326 

85 010330 

86 010332 

87 010334 

88 010336 

89 010344 

90 010350 

91 010352 

92 010356 

93 010360 

94 010362 

95 010370 

96 010374 

97 010402 

98 010410 

99 010416 

100 010420 

101 010422 

102 010426 



80 



105777 
100001 

104005 
032777 
001402 

104002 
000401 

104000 

000002 



017701 
005701 
100374 
010102 
000302 
042702 
010203 
006302 
126201 
001403 
016205 

104003 

105262 
001355 
005767 
001007 
005703 
001014 
005300 
001012 
012767 
005777 
001340 
105777 
001335 
000417 
042777 
050377 
012777 
012777 
056277 
000715 
104400 
000167 
000001 



001516 



040000 001504 



61: 



.RECEIVER INTERRUPT SERVICE ROUTINE 

:IS CHARACTER AVAILA3LE SET 



3«: 



001470 7$ ! 



177760 

012450 
012450 

012450 
001520 



000001 001500 
001406 81 j 

001406 



000017 001354 91 : 
001350 

012050 001350 

177400 001344 

010426 001340 



TSTB 
BPL 
HLT 
EMT 
BIT 
BEQ 
HLT 
EMT 
BR 
HLT 
EMT 

RTI 



80HSCR 
.♦4 

5 
5 

MOOOO.SOHSCR 

.♦6 

2 

2 

3» 

0 

0 



000040 



101: 
BARBIT; 



t RECEIVER DATA CHECK 

(GET A CHARACTER FROM THE SILO 

I IF IT IS VALID DATA. CHECK IT 
(OTHERWISE . TRY AGAIN 

MOV UHNRCRl 

TST Rl 

BPL 7» 

MOV R1.R2 

SWAB R2 

BIC «1 77760, R2 

MOV R2.R3 

ASL R2 

CMPB R8UFCR2).R1 

BEQ .*10 

MOV RBUF(R2).RS 

HLT 3 

EMT 3 

INCB RBUF(R2) 

BNE 7t 

TST ENOFLG 

BNE 8t 

TST R3 

BNE 9« 

DEC RO 

BNE 9« 

MOV «1 .ENOFLG 

TST SDHBAR 

BNE 7t 

TSTB SOHSLR 

8NE 7t 

BR lot 

BIC «17.S0HSCR 

BIS R3,80HSCR 

MOV «TBUF.a)HBA 

MOV *-400.fl)HBC 

BIS BARBIT(R2), SDHBAR 

BR 7t 

SCOPE 

JMP EOP 

1 



(CHARACTER AVAILABLE SET. ERROk 
lis SILO OVERRUN SET 
I SILO OVERRUN. ERROR 

I SPURIOUS INTERRUPT 
iTEST UILL RESTART 



iREAD NEXT RECEIVED CHARACTER REGISTER 
IF VALID D.'^TA BIT NOT SET 
TRY AGAIN 

EXTRACT LINE NUMBER 



: DOUBLE LINE NUMBER FOR OFFSET 
(COMPARE RECEIVED AND EXPECTED RESULTS 

iGET EXPECTED DATA 
iOATA ERROR 

(UPDATE EXPECTED DATA 
(CONTINUE IF NOT 0 
(IF ALL LINES HAVE FINISHED 
(10 BLOCKS OF DATA. CLEAN UP 
(IF THE LINE IS 0 

(UPDATE BLOCK COUNT 

(IF LINE 0 HAS TRANSMITTED 10 BLOCKS 

(SET END FLAG 

(IF ALL LINES NOT DONE 

(GET MORE CHARACTERS 

(IF SILO IS NOT EMPTY 

(GET REST OF DATA 

(WHEN EMPTY. SCOPE ON TEST 

(ADDRESS LINE THAT JUST FINISHED 

(SET UP BUS ADDRESS AND BYTE COUNT 

(FOR THAT LINE 

(SET BAR BIT FOR THAT LINE 

(CONTINUE 

(CHECK FOR ITERATIONS. LOOP 
(GO TO END OF PASS ROUTINE 



CZOHG-CO 



103 01043C 

104 010432 

105 010434 

106 010436 

107 010440 

108 010442 

109 010444 

110 010446 

111 010450 

112 010452 

113 010454 

114 010456 

115 010460 

116 010462 

117 010464 
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000002 


2 


000004 


4 


000010 


IC 


000020 


20 


000040 


40 


000100 


100 


000200 


200 


000400 


400 


001000 


1000 


002000 


2000 


004000 


4000 


010000 


10000 


020000 


20000 


040000 


40000 


100000 


100000 



SEQ 59 
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SEQ 60 



2 010466 



.EOP 



t/BEGIN/ 



010466 
010470 
010472 
010476 
010502 
010506 
010512 
010514 
010516 
010520 
010522 
010524 
010526 
010526 
010534 
010534 
010540 
010542 
010544 
010546 
010550 
010552 
010554 
010560 
010562 
010564 
3 010566 



104401 
013127 
005067 
005067 
005267 
005767 
001005 
104401 
013142 
104402 
010560 
000403 

016767 

013701 
001405 
000005 
004711 
000240 
000240 
000240 
000167 
000001 
006 
012000 



EOP: 



001344 

00i;>74 
001272 
170270 



001246 
000042 



1702J£ 



170526 
002 



:END Of PASS 
sTYPE NAME OF TEST 
sOPOATE PASS COUNT 
;CHECK FOR EXIT TO ACT-11 
{RESTART TEST 



2«: 
31: 



LOGICAL: 



RESTRT: 
PASARG: 



.SCOPE 



TYPE 

NEPASS 

CLR 

CLR 

INC 

TST 

BNE 

TYPE 

PASTXT 

OCTASC 

PASARG 

BR 

MOV 

MOV 
BEQ 
RESET 

'nop 

NOP 

NOP 

JMP 

.UORO 

.BYTE 

.HORO 



LAST 

ERRFLG 

PASCNT 

LIGHTS 

2* 



3) 

PASCNT, LIGHTS 



M42.R1 
RESTRT 

JSR 



TYPE NAME OF TEST 

CLEAR LAST ERROR PC 

CLEAR ERROR FLAG 

UPDATE PASS COUNT 
ARE HE USING LIGHTS? 
BRANCH IF UE ARE 
TYPE PASCOUNT MESSAGE 

PRINT PASSCOUNT 

CONTINUE 

DISPLAY PASS COUNT 

CHECK FOR ACT-11 OR ODP 
ilF NOT. CONTINUE TESTING 



4 

6 
5 
5 
4 

4 
4 



(4 I 6 



PC.(Rl) 



BEGIN 
1 

6.2 
PASCNT 



PARAMETERS TO PRINT PASSCOUNT 



(CHECK FOR LOOP ON CURRENT TEST 
I CHECK FOR ITERATION SUPPRESSION 



010566 


032777 


002000 


170204 


SCOPER: 


BIT 


«SU10.SSUR 


010574 


001030 








BNE 


41 


010576 


032777 


040000 


170174 


1»: 


BIT 


«SU14,SSUR 


010604 


001021 








BNE 


3$ 


010606 


032777 


004000 


170164 




BIT 


•SW11.8SUR 


010614 


001006 








BNE 


21 


010616 


005267 


001172 






INC 


LPCNT 


010622 


026767 


001166 


001162 




CMP 


LPCNT.ICOUNT 


010630 


001007 








BNE 


3» 


010632 


005067 


001156 




2»: 


CLR 


LPCNT 


010636 


005067 


001134 






CLR 


ERRFLG 


010642 


011667 


001136 






MOV 


(SP),RETRN 


010646 


000002 








RTI 




010650 


016716 


001130 




3): 


MOV 


RETRN.(SP) 


010654 


000002 








RTI 




010656 


00!»767 


001114 




4t: 


TST 


ERRFLG 


010662 


001745 








BEQ 


11 



« 5 
t 5 
I 5 



t 3 

i 4 
I 4 
I 4 
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SEQ 61 



010664 000762 BR 2« 

4 0106e6 .SCOPl 

: CHECK FOR FREEZE ON CURRENT DATA 



010666 


032777 


001000 


170104 


SCOPIR: 


BIT 


•SU09.8SUR 


010674 


001402 








BEQ 


1« 


010676 


016716 


001106 






nov 


FREm.(SP) 


010702 


000002 






1>: 


RTI 




010704 








.ERROR 
















1 ERROR HANDLER 


010704 


032777 


020000 


170066 


ERRORS: 


BTT 




010712 


001055 












010714 


021667 


00112<! 






r HP 


f CP^ 1 ACT 


010720 


001404 








Ob II 




010722 


011667 


001114 






riw w 


f <LP1 1 AQT 
V Or J « 1 


010726 


005067 


001044 






ri Q 


FQOn 


010732 


104406 






11: 


SAVOSP 




010734 


011605 








* nj ¥ 


V Or y « n w 


010736 


162705 


000002 








wc ■ n ^ 


010742 


011504 








now 


(OK^ OA 


010744 


006304 








ASL 




010746 


006304 








ASL 


R4 


010730 


042704 


177001 






BIC 


•177001 R4 


010754 


062704 


013262 






ADD 


•ERR TAB R4 


010760 


012467 


000040 






MOV 


(R4)*.ERRHSG 


010764 


011467 


000052 






MOV 


(R4) OATABP 


010770 


005767 


001002 






TiT 


ERRFL6 


010774 


001403 








BEQ 


TYPMSG 


010776 


005767 


000040 






TST 


OATABP 


011002 


001011 








BNE 


TYPOAT 


011004 


104401 






TYPHSG: 


TYPE 




011006 


013037 








HCRLF 




011010 


104402 








OCTASC 




011012 


011110 








ERTABO 




011014 


012767 


000001 


000754 




NOV 


tl.ERRFLG 


011022 


104401 








TYPE 




011024 


000000 






ERRtlSG: 


0 




011026 


005767 


000010 




TYPOAT; 


TST 


OATABP 


0110S2 


001404 








BEQ 


RESREG 


0110S4 


104401 








TYPE 




0110S6 


013037 








HCRLF 




011040 


104402 








OCTASC 




011042 


000000 






OATABP: 


0 




011044 


104407 






RESREG: 


RES05 




011046 


005777 


167726 




MALTS: 


TST 


8SUR 


011052 


100005 








BPL 


EXXTER 


011054 


010046 








PUSHRO 




011056 


016600 


000002 






nov 


2CSP).R0 


011062 


000000 








HALT 




011064 


012600 








POPRO 




011066 


005267 


000710 




EXXTER: 


INC 


ERRCKT 


011072 


032777 


002000 


167700 




BIT 


•SU10.8SUR 


011100 


001402 








BEQ 


1< 


011102 


016716 


000700 






HOV 


ESCAPE. (SP) 



CZOHCCO 



HACRO V04.00 ZT-MH-BS 13:01:44 PACE 2« 2 



SEQ 62 



011106 000002 

011110 000001 

011112 006 

011114 012034 
6 011116 



002 



II: 

ERTABO: 



.TRPSRV 



RTI 
1 

.BYTE 
SAVPC 



6.2 



J TRAP DISPATCH SERVICE 

:AR6UnENT OF TRAP IS EXTRACTED 

sAND USED AS OFFSET TO OBTAIN POINTER 

:T0 SELECTED SUBROUTINE 



i 3 



011116 


011646 




TRPSRV: 


MOV 


(SP).-(SP) 


011120 


162716 


000002 




SUB 


♦2.(SP) 


011124 


017616 


000000 




MOV 


8(SP).(SP) 


011130 


006316 




TRPOti: 


ASL 


(SP) 


011132 


042716 


177001 




BIC 


♦177001, (SP) 


011136 


062716 


013202 




ADO 


♦TRPTAB,(SP) 


011142 


017616 


000000 




MOV 


8(SP).(SP) 


011146 


000136 






JMP 


8(SP)« 


7 OlllSO 






.TYPER 














1 TELETYPE OUTPUT ROUTINE 


011150 


017605 


000000 


TYPER: 


MOV 


8(SP).R5 


011154 


062716 


000002 




ADD 


♦2.(SP) 


011160 


105777 


000554 


11: 


TSTB 


8TPCSR 


011164 


100375 






BPL 


11 


011166 


J 05715 






TSTB 


(R5} 


011170 


001001 






BNE 


2« 


011172 


000002 






RTI 




011174 


112577 


000542 


21; 


novB 


(R5)«,8TPDBR 


011200 


000767 






BR 


1> 



iGET PC OF RETURN 
j-PC OF TRAP 
5 GET TRP 

i MULTIPLY TRAP ARC BY 2 

; CLEAR UNWANTED BITS 

: POINTER TO SUBROUTINE ADDRESS 

{SUBROUTINE ADDRESS 

iGO TO SUBROUTINE 



8 011202 



.INSTRG 



(ASCII STRING INPUT ROUTINE 



011202 


017667 


000000 


000006 


INSTRG: 


nov 


8(SP}.nSG 


011210 


062716 


000002 






ADO 


*2.(SP} 


011214 


104401 






INSTRl: 


TYPE 




011216 
011220 


000000 






nSG: 


0 




012704 


013224 






MOV 


#INBUF.R4 


012224 


012703 


000007 






MOV 


♦7,R3 


011230 


105777 


000500 




11: 


TSTB 


8TKCSR 


011234 


100375 








BPL 


1) 


011236 


117714 


000474 






MOVB 


8TK06R.(R4) 


011242 


142714 


000200 






BICB 


«200.(R4) 


011246 


122427 


000015 






CHP6 


(R4)*,*15 


011252 


001413 








BtQ 


INSTR2 


011254 


117777 


000456 


000460 




MOVB 


8TK0BR.8TP0BR 


011262 


105777 


000452 




21: 


TSTB 


8TPCSR 


011266 


100375 








BPL 


2t 


011270 


005303 








DEC 


R3 


011272 


0013S6 








BNE 


11 


011274 


'04401 






INSTRE: 


TYPE 




011276 


013033 








MOM 




OllSOO 


000745 








BR 


INSTRl 


011302 


000002 






IN5TR2: 


RTI 




9 011304 








.PARAnS 
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63 



: CONVERT ASCII STRING TO OCTAL 





A1 ifkCVK 




PARAMS • HOW 






r 


0001 A6 


MOW 


(lkS* loi tm 


01 1119 


VXC^w r 


OOOIA* 
wwx^^ 


■ ■wv 


fOS)* HILIH 
\nj J ^ t nxiwXi 1 




VXC^w r 




MOV 




01 

VX XvCfc 


11PS67 

XXK^V f 


000140 


novB 


(RSI* LOBITS 


011396 

VX X^KV 


119S67 

XXfc^w f 


0001 3S 

WVX J 


N0V8 


(R5)*.A0RCNT 


01 133P 

VX X99mf 


VXVmtXO 




NOV 


RS (SP) 


Of USA 






PARAMi • CLR 


Rb 


011336 


VXC f 


013224 

VX 


NOV 


#INBUF R4 


01 1349 


XCS ' x^ 


000015 


CNPB 


#15.CR4) 


011346 


001420 




8EQ 


PAPERR 


OllZSO 


191427 


000060 


lis CNPB 


CR4}.#60 


011354 

WX X%Pm^T 


002415 




BLT 


PARERR 


011356 


121427 

XK X^K ' 


000067 


CNPB 


(R4).#67 


011362 


003012 




BGT 


PARERR 


011364 


142714 


000060 


BICB 


460.CR4) 


011370 


152405 




BISB 


(R4)*.R5 


011372 


122714 


000015 


CNPB 


•15, (R4) 


011376 


001406 




BEQ 


LINITS 


011400 


006305 




ASL 


R5 


011402 


006305 




ASL 


R5 


011404 


006305 




ASL 


R5 


011406 


000760 




BR 


11 


011410 


104404 




PARERR: INSTER 




011412 


000750 




BR 


PARANl 








iTEST 


TO SEE IF NUNBI 


011414 


020567 


000042 


LINITS: CNP 


R5.HILIN 


011420 


101373 




BHI 


PARERR 


011422 


020567 


000032 


CMP 


R5.L0LIN 


011426 


103770 




BLO 


PARERR 


011430 


136705 


000032 


BITB 


LOBITS. R5 


011434 


001365 




BNE 


PARERR 



011436 
011442 
011444 
011450 
011454 
011456 
011460 
011462 
011464 
011466 

10 011470 



011470 
011474 



016704 000022 
010524 

062705 000002 

105367 000013 

001372 

000002 

000000 

OOOOOC 

000000 

000000 

011467 



017601 000000 
062716 000002 



I STORE NUMBER AT SPECIFIED ADDRESS 



1«: 



LOLIN: 
HILIN: 
OEVAOR: 
LOBITS: 



NOV 
NOV 
ADO 
DECB 
BNE 
RTI 
0 
0 
0 
0 



OEVAOR. R4 

R5.(R4}* 

•2.RS 

AORCNT 

II 



AORCNT-LQBITS*! 
.OCTASC 



{CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 



OCTASN: 



MOV 
ADD 



0(SP).R1 
•2.CSP) 
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SEQ 64 



011500 


012167 


000130 


011504 


112167 


000126 


011510 


112167 


000123 


011514 


013167 


000120 


011520 


016704 


000114 


011524 


116705 


000106 


011530 


012700 


013236 


011534 


010403 




011536 


042703 


177770 


011542 


062703 


000260 


011346 


110320 




011550 


006204 




011552 


006204 




011554 


006204 




011556 


005305 




011560 


001365 




011562 


012703 


013250 


011566 


114023 




Ot 1570 


105367 


000042 


011574 


001374 




011576 


105767 


000035 


011602 


0Ci405 




011604 


112723 


000240 


011610 


105367 


000023 


011614 


001373 




011616 


105013 




011620 


104401 




011622 


013250 




011624 


005367 


000004 


011630 


001325 




011632 


000002 




0116S4 


000000 




OX lose 


000000 






011637 




011640 


000000 




11 011642 






011642 


016667 


000004 



011650 
011654 
011660 
011664 
011670 
011674 
011700 
12 011702 



011702 
011706 
011712 
011716 



010567 
010467 
010367 
010267 
010167 
010067 
000002 



016700 
016701 
016702 
016703 



000154 
000146 
000140 
000132 
000124 
000116 



000110 
000106 
000104 
000102 



II: 
2t: 
31: 



4t: 

51: 
6»: 



UROCNT: 0 
CHRCNT: 0 
SPACNT-CHRCNT*1 
BZNUM): 0 
.SAVRE6 



nov 


(Rl)«. UROCNT 


nova 


(RD*. CHRCNT 


novB 


(R1)».SPACNT 


nov 


8(R1)*.BINURD 


nov 


BINURD.R4 


novB 


CHRCNT .R5 


nov 


♦TEHP.RO 


nov 


R4.R3 


BIC 


♦177770. R3 


ADO 


«260,R3 


novB 


R3,(R0)* 


ASR 


R4 


ASR 


R4 


ASR 


R4 


DEC 


R5 


BNE 


3* 


nov 


«nOATA.R3 


novB 


-(R0).(R3)« 


OECB 


CHRCNT 


BNE 


41 


TSTB 


SPACNT 


BEQ 


6* 


novB 


•240. (R3)* 


OECB 


SPACNT 


BNE 


51 


CLRB 


(R3) 


TYPE 




nOATA 




DEC 


yRDCNT 


BNE 


11 


RTI 





000164 SV05P: 



SV05: 



I SAVE PC OF TEST THAT FAILED AND R0-R5 
nov 4(SP).SAVPC 
I SAVE R0-R5 



.RESREG 



nov 

NOV 

nov 

NOV 

nov 
nov 

RTI 



RS.SAVRS 
R4.SAVR4 
R3.SAVR3 
R2.SAVR2 
Rl.SAVRl 
RO.SAVRO 



I 3 



{RESTORE R0-R5 



RS05: 



nov 
nov 
nov 
nov 



SAVRO.RO 
SAVRl.Rl 
SAVR2.R2 
SAVR3.R3 



CZ0H6-CO 



HACRO V04.00 27-JUN-a5 13:01:48 PAGE ?4-5 



SEQ 65 



011722 016704 000100 

011726 016705 000076 

011732 000002 
13 011734 



011734 177560 

011736 177562 

011740 177564 

011742 177566 



TLVL> 



011744 
011746 
011750 
011752 
011754 
011756 
011760 
011762 
011764 
011766 
011770 
011772 
011774 
14 011776 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 



.POINT 



TKCSR 
TKDBR 
TPCSR 
TPOSR 
.IRP 



nOV SAVR4.R4 
nOV SAVR5.R5 
RTI 

t /DHSCR . DHNRC . DHLPR . OHBA .OHBC . OHBAR , OHBCR . DHSSR . DHSLR , DHRVEC . OHRLVL , OHTVEC . OHTLVL / 
t INDIRECT POINTERS , 3 

177560 
177562 
177564 
177566 

A <OHSCR . OHNRC . DHLPR . DHBA . OHBC .OHBAR . DHBCR .DHSSR , DHSLR . DHR VEC , OHRL VL . DHT VE C . OH 



A: 0 
.ENDH 

DHSCR: 0 

DHNRC: 0 

DHLPR: 0 

DHBA: 0 

OHBC: 0 

OHBAR: 0 

OHBCR: 0 

DHSSR: 0 

DHSLR: 0 

DHRVEC: 0 

DHRLVL: 0 

DHTVEC: 0 

OHTLVL: 0 

.VMIA t/EN0FL6.T0ATA/ 

iPROGRAH VARIABLES 



011776 
012000 
012002 
012004 
012006 
012010 
012012 
012014 
012016 
012020 
012022 
012024 
012026 
0120S0 
012033 
012034 
012036 
012040 
012042 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 



012044 000000 
012046 000000 



16 

IB 012050 

19 

20 



000001 
000 
000377 



ERRFL6: 0 
PASCNT: 0 
ERRCNT: 0 
RETRNt 0 
ESCAPE: 0 
FREEZl: 0 
ICOUNTt 0 
LPCNTt 0 
SAVRO: 
SAVRl: 
SAVR2t 
SAVR3: 
SAVII4: 
SAVRS: 
SAVSPt 
SAVPC: 
INIFL6: 0 
STFL6: 0 
LAST: 0 
.IRP A 
A> 0 



0 
0 
0 
0 

0 
0 
0 
0 



lERIKM FLAG 
tPASS COUNT 
lERRQR COUNT 

{SCOPE RETURN ADDRESS FOR TEST LOOPING 
lAOORESS FOR ERROR ESCAPE 
lOATA LOOPING RETURN ADDRESS 
tITERAnON COUNT FOR TEST IN PROGRESS 
iNUHKR OF ITERATIONS THIS TEST 
iRO SAVE AREA 
iRl SAVE AREA 
(R2 SAVE AREA 
iRS SAVE ARE 
|R4 SAVE AREA 
iRS SAVE AREA 
iSTACX POINTER SAVE AREA 
iCALLINB ROUTINE SAVE AREA 
iPROQRAN INinALlZATIQN aAB 
iPROGRAH START FLAG 
iLAST ERROR PC 
€EIBFL6.TDATA> 



I S 



ENOFLG: 0 
TDATA: 0 
TDAT«1 

TtUF: .SHE 
.REPT S77 
.•YTE TDAT 
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21 




.NLIST 


22 




TDAT"TDAT»1 


23 




• LIST 


24 




.ENOR 


012051 


001 


.BYTE TDAT 




000002 


TDAT"TDAT»1 


012052 


002 


.BYTE TDAT 




000003 


TDAT-TDAT»1 


012053 


003 


.BYTE TDAT 




000004 


TDAT "TDAT ♦I 


012054 


004 


.BYTE TDAT 




000005 


VAAV_VAAV ■ 

TDAT "TDAT* 1 




005 


.BYTE TDAT 




000006 


TQAT"TQMT»1 


012056 


006 


.BYTE TDAT 




000007 


TDAT "TDAT ♦! 


0X2057 


007 


.BYTE TDAT 




000010 


TDAT "1 DAT ♦I 


012060 


At A 

010 


.BTTe TDAT 




AAAAt t 

000011 


TDAT"T0AT*1 


012061 


At t 

oil 


.BYTE TDAT 




OOOOX2 


IDAT"TDAT* 1 


At 

012v62 


At 9 

0X2 


.BYTE TDAT 




AAiW\t V 

OOC^XS 


T0AT"TDAT»1 


At 9AAS 

012069 


At V 

OX9 


DVTC TAAT 

.BTTc TDAT 




AAAAt A 

OOOOX4 


THAT mTAAT . t 


At 

012004 


At A 

0X4 


.BTIe TDAT 




AAAAtC 

OOOOX3 


1 OA 1 ■ 1 OA 1 * X 


At 9AAK 
0X2003 


Ate 

015 


.BYIE TDAT 




AAAAt £ 


THAT bTAAT . t 

IDA! "lOAI ♦X 


At 9AJL^ 


Vie 


.01 It lUA. 




AI1/V%t 7 
OUUUl / 


THAT aT.*^AT . t 
lOAI "IwAI ♦X 


At 

0X20O/ 


At 7 

OX 1 


DVTC THAT 
.DTIt IDA! 




AAAAOA 


TAAT aTAAT t 
1 UA 1 ' 1 UA 1 * X 


At 9A7A 

0X20/0 


A9A 
020 


QVTC THAT 

.BTTc TDAT 




AAAA9t 


TnATsTAAT^ t 

1 UA 1 ■ 1 1 * X 


At 9A7t 


AOt 

02X 


DVTC TAAT 

.BTTc lUAl 




AAAA93 

UUUUee 


TAATmTAATa 1 

lOAl ■ IOAT»X 


At 

0X20/2 


A09 

022 


DVTC TAAT 

.BTTc TUAT 






TAATaTAAT . t 

lOAl ■ 1 UA 1 *X 


At '*A^1 

0X£073 


A 91 

023 


DVTC TAAT 

.BTIE TOAT 




AAAA9A 

000024 


Tf^ AT bTAAT ... t 

TDAT "IDA I ♦ X 


At 


A9A 

024 


DVTC TAAT 

.BTIt TUAT 




AAAA9C 

UUUUe3 


TAATflTAAT.^ t 

1 UA 1 ' 1 UA 1 * 1 


At OA 7^ 

OXeOrs 


A9C 


DVTC TAAT 

.BTTc TUAT 




AAAA9^ 


TAATaTAAT.^ 1 
1 UA 1 ■ 1 UA 1 * X 


At 9A7£ 

oXcO /e 




DVTC THAT 
.DTIC lUAl 






TnATaTOAT. t 
lUAl ■ 1 UA 1 'X 


At 

UXcvf 1 


A07 

02/ 


DVTC THAT 

.BTic lOAT 




AAAATA 


THAT aTAAT ^ t 

1 UA 1 ■ 1 UA 1 * X 


At 9t AA 

OX2XOO 


nVA 


DVTC THAT 

.BTIt lOAl 






1 UA 1 * 1 Un 1 * I 


012101 


031 


.BYTE TDAT 




000032 


TDAT-TDAT*1 


012102 


032 


.BYTE TDAT 




000033 


TDAT -TOAT »1 


012103 


033 


.BYTE TDAT 
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000034 

WW 


TDATaTDAT* 1 




034 

V 


Dyrr TDAT 




0000 3S 

WW<J J 


TDAT'TDAT* 1 


VAC 


OSS 


BYTE TOAT 

• w 1 I b 1 Vn 1 




000036 


TDAT^TOAT* 1 

1 V" I I V" 1 * A 




036 






000037 


TOAT'TOAT*! 


012107 

VAC A V ■ 


037 


BYTE TOAT 




000040 

WW^V 


T0AT«T0AT*1 

1 i/n I I i/n 1 • A 


OlPllO 

* AS A AV 


040 


BYTE TD.1T 

• Wllb li/*fl 




000041 


TOAT'TOAT*! 

1 i/n I I i/n 1 * A 


OlPlll 

VAC A A A 


041 


BYTE TOAT 

• wiifc. i|/ni 




300042 


TOAT-TOAT*! 


012112 

VAC A AC 


042 


BYTE TOAT 




000043 


T0AT>T0AT*1 


012113 

VAC A A*' 


043 


BYTE TOAT 




000044 


T0AT-TDAT*1 


012114 

VAC A A^ 


044 


BYTE TOAT 

• viiim ivni 




000045 


TOAT-TOAT*! 


0121 IS 

VAC A A^ 


045 


BYTE TOAT 




000046 


1DAT«TDAT*1 


012116 


046 


BYTE TOAT 




000047 


TDAT*T0AT*1 


012117 


047 


BYTE TOAT 




000050 


TDAT-TDAT*1 


012120 


050 


•BYTE TDAT 




000051 


TDAT-TDAT*1 


012121 


051 


.BYTE TOAT 




000052 


TOAT -TOAT *1 


012122 


052 


.BYTE TOAT 




000053 


TOAT -TOAT •! 


012123 


053 


.BYTE TOAT 




000054 


TDAT -TDAT* 1 


012124 


054 


.BYTE TDAT 




000055 


TDAT -TDAT *1 


012125 


055 


.BYTE TDAT 




000056 


TDAT -TDAT *1 


012126 


056 


.BYTE TDAT 




000057 


TDAT -TDAT ♦! 


012127 


057 


.BYTE TDAT 




000060 


TDAT -TDAT *1 


012130 


060 


.BYTE TDAT 




000061 


TDAT-TDA'r«l 


012131 


061 


.BYTE TDAT 




000062 


TDAT-TDAT*1 


012132 


062 


.BYTE TDAT 




000063 


TOAT-TDAT*! 


012133 


063 


.BYTE TDAT 




000064 


TDAT -TDAT •! 


012134 


064 


.BYTE TDAT 




000065 


TDAT -TDAT *1 


012135 


065 


.BYTE TDAT 




000066 


TDAT -TDAT* 1 


012136 


066 


.BYTE TDAT 




000067 


TDAT -TDAT* I 


012137 


067 


.BYTE TDAT 




000070 


TOAT -TOAT *1 



CZOHG-CO 
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012140 


070 


.BYTE TOAT 




000071 


TOAT-TDAT.l 


012141 


071 


.BYTE TOAT 




000072 


TOAT-TDAT.l 


012142 


072 


.BYTE TOAT 




000«l73 


TOAT-TDAT.l 


012143 


073 


.BYTE TDAT 




000074 


TDAT-TDAT.l 


012144 


074 


.BYTE TDAT 




000075 


TDAT-TDAT.l 


012145 


075 


.BYTE TDAT 




000076 


TDAT-TDAT.l 


012146 


076 


.BYTE TDAT 




000077 


TDAT-TDAT.l 


012147 


077 


.BYTE TDAT 




000100 


TDAT-TDAT.l 


012150 


100 


.BYTE TDAT 




000101 


TDi^T-TDAT.l 


012151 


101 


.BYTE TDAT 




000102 


TDAT-TDAT.l 


012152 


102 


.BYTE TDAT 




000103 


TOAT-TDAT.l 


012153 


103 


.BYTE TDAT 




000104 


TDAT-TDAT.l 


012154 


104 


.BYTE TDAT 




000105 


TDAT-TDAT.l 


012155 


105 


.BYTE TDAT 




000106 


TDAT-TDAT.l 


012156 


106 


.BYTE TDAT 




000107 


TDAT-TDAT.l 


012157 


107 


.BYTE TDAT 




300110 


TOAT-TDAT.l 


012160 


110 


.BYTE TOAT 




000111 


TOAT-TDAT.l 


012161 


111 


.BYTE TDAT 




000112 


TOAT-TDAT.l 


012162 


112 


.BYTE TOAT 




000113 


TOAT-TDAT.l 


012163 


113 


.BYTE TOAT 




000114 


TOAT-TDAT.l 


012164 


114 


.BYTE TOAT 




000115 


TOAT-TDAT.l 


012165 


115 


.BYTE TOAT 




000116 


TOAT-TDAT.l 


012166 


116 


.BYTE TOAT 




000117 


TDAT-TDAT.l 


012167 


117 


.BYTE TOAT 




000120 


TDAT-TDAT.l 


012170 


120 


.BYTE TOAT 




000121 


TDAT-TDAT.l 


012171 


121 


.BYTE TDAT 




000122 


TDAT-TDAT.l 


012172 


122 


.BYTE TOAT 




000123 


TDAT-TDAT.l 


012173 


123 


.BYTE TOAT 




000124 


TDAT -TDAT >1 


012174 


124 


•BYTE TOAT 
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000125 


TOAT-TOAT*! 


012175 


125 


.BYTE TOA' 




000126 


T0AT-TDAT»1 


012176 


126 


.BYTE TOAT 




000127 


T0AT-T0AT*1 


012177 


127 


.BYTE TOAT 




000130 


T0AT-T0AT*1 


012200 


130 


.BYTE TOAT 




000131 


tdmt-toat*i 


012201 


131 


.BYTE TOAT 




000132 


T0AT-TDAT*1 


012202 


132 


.BYTE TOAT 




000133 


T0AT-T0AT*1 


012203 


133 


.BYTE TOAT 




000134 


T0AT-T0AT»1 


012204 


134 


.BYTE TOAT 




000135 


TOAT -TOAT* I 


012205 


135 


.BYTE TOAT 




000136 


TOAT -TOAT* I 


012206 


136 


.BYTE TOAT 




000137 


TOAT -TOAT* I 


012207 


137 


.BYTE TOAT 




000140 


TOAT -TOAT ^l 


012210 


140 


.BYTE TOAT 




000141 


T0AT-T0AT»1 


012211 


141 


.BYTE TOAT 




000142 


TOAT -TOAT 41 


012212 


142 


.BYTE TOAT 




000143 


TOAT -TOAT ♦I 


012213 


143 


.BYTE TDAT 




000144 


TOAT-TOAT*! 


012214 


144 


.BYTE TDAT 




000145 


TDAT-T0AT*1 


012215 


145 


•BYTE TOAT 




000146 


TOAT-TOAT^l 


012216 


146 


.BYTE TDAT 




000147 


TDAT-TDAT*! 


012217 


147 


.BYTE TDAT 




000150 


TDAT-TDAT*1 


012220 


150 


.BYTE TDAT 




000151 


TDAT-TDAT*1 


012221 


151 


.BYTE TDAT 




000152 


TDAT-T0AT*1 


012222 


152 


.BYTE TOAT 




000153 


TOAT -TOAT ♦I 


012223 


153 


.BYTE TOAT 




000154 


T0AT-T0AT*1 


012224 


154 


.BYTE TOAT 




000155 


TDAT -TOAT ♦I 


012225 


155 


.BYTE TDAT 




000156 


TDAT -TDAT ♦I 


012226 


156 


.BYTE TOAT 




000157 


TOAT -TDAT ♦! 


012227 


157 


.BYTE TOAT 




000160 


T0AT-TDAT*1 


012230 


160 


.BYTE TOAT 




000161 


TDAT-TOAT*! 



SEQ 70 
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012231 


161 


.OYTE TDAT 




000162 


TDAT"TDAT*1 


012232 


162 


.BYTE TOAT 




000163 


T0AT-TDAT*1 


01223? 


163 


.BYTE TOAT 




000164 


TDAT-T0AT»1 


012234 


164 


.BYTE TOAT 




000165 


TDAT-TDAT+1 


01223S 


165 


.BYTE TOAT 




000166 


rOAT-TOAT^l 


012236 


166 


.BYTE TOAT 




000167 


TDAT-TDAT»1 


012237 


167 


.BYTE TOAT 




000170 


TDAT-TDAT»1 


012240 


170 


.BYTE TOAT 




000171 


T0AT"TDAT*1 


012241 


171 


.BYTE TOAT 




000172 


TOAT -TOAT 41 


012242 


172 


.BYTE TOAT 




000173 


TDAT-TDAT«1 


012243 


173 


.BYTE TOAT 




000174 


TDAT-TDAT*1 


012244 


174 


.BYTE TOAT 




000175 


T0AT-TDAT«1 


012245 


175 


.BYTE TOAT 




000176 


TOAT -TOAT ♦I 


012246 


176 


.BYTE TDAT 




000177 


TOAT-TDAT^l 


012247 


177 


.BYTE TDAT 




000200 


TDAT-TDAT«1 


012250 


200 


.BYTE TDAT 




OOOiiOl 


TDAT-TDAT«1 


012251 


201 


.BYTE TDAT 




000202 


TDAT-TDAT^l 


012252 


202 


.BYTE TDAT 




000203 


TDAT-TOAT*! 


012253 


203 


.BYTE TDAT 




000204 


TDAT-TDAT*! 


012254 


204 


.BYTE TDAT 




000205 


T0AT-TDAT»1 


012255 


205 


.BYTE TDAT 




000206 


TDAT»TDAT»1 


012256 


206 


•BYTE TDAT 




000207 


TDAT -TDAT a 


012257 


207 


.BYTE TDAT 




000210 


TDAT"TDAT«1 


012260 


210 


.BYTE TDAT 




000211 


TDAT-TDAT*1 


012261 


211 


.BYTE TDAT 




000212 


TDAT-T0AT»1 


012262 


212 


.BYTE TDAT 




000213 


TDAT -TDAT* I 


012263 


213 


.BYTE TDAT 




000214 


TDAT-T0AT«1 


012264 


214 


.BYTE TOAT 




000215 


TOAT -TDAT ♦! 


012265 


215 


.BYTE TDAT 



L 
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000216 


T0AT-TDAT*1 


012266 


216 


.BYTE TOAT 




000217 


T0AT-T0AT*1 


012267 


217 


•BYTE TDAT 




000220 


TDAT»T0AT*1 


012270 


220 


.BYTE TOAT 




000221 


TDAT-T0AT*1 


012271 


221 


.BYTE TOAT 




000222 


T0AT"TDAT*1 


012272 


222 


.BYTE TOAT 




000223 


TDAT -TDAT +1 


012273 


223 


.BYTE TOAT 




000224 


T0AT-T0AT*1 


012274 


224 


.BYTE TOAT 




000225 


T0AT-TDAT*1 


012275 


225 


.BYTE TOAT 




000226 


T0AT-T0AT*1 


012276 


226 


.BYTE TDAT 




000227 


TDAT -TDAT U 


012277 


227 


.BYTE TDAT 




000230 


TDAT -TDAT U 


012300 


230 


.BYTE TDAT 




000231 


TO AT -TOAT ♦I 


012301 


231 


.BYTE TDAT 




000232 


TOAT -TOAT U 


012302 


232 


.BYTE TDAT 




000233 


TOAT -TDAT ♦I 


012303 


233 


.BYTE TOAT 




000234 


T0AT-T0AT»1 


012304 


234 


.BYTE TOAT 




000235 


T0AT-TDAT*1 


012305 


235 


.BYTE TOAT 




000236 


TOAT -TOAT ♦I 


012306 


236 


.BYTE TOAT 




000237 


TOAT -TOAT ♦I 


012307 


237 


.BYTE TOAT 




000240 


TOAT -TOAT* I 


012310 


240 


.BYTE TOAT 




000241 


TOAT-TOAT^l 


012311 


241 


.BYTE TOAT 




000242 


T0AT-T0AT»1 


012312 


242 


.BYTE TOAT 




000243 


T0AT-T0AT»1 


012313 


243 


.BYTE TOAT 




000244 


TOAT -TDAT ♦! 


012^14 


244 


.BYTE TOAT 




000245 


TOAT -TDAT ♦I 


012315 


245 


.BYTE TOAT 




000246 


T0AT-T0AT»1 


012316 


246 


.BYTE TOAT 




000247 


T0AT-T0AT»1 


012317 


247 


.BYTE TOAT 




000250 


TDAT -TOAT ♦I 


012320 


250 


.BYTE TOAT 




000251 


TOAT -TDAT* I 


012321 


251 


.BYTE TOAT 




000252 


TOAT -TOAT ♦! 
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012322 


-"^2 


.BYTE TOAT 




000< 5 


T0AT-T0AT*1 


012i23 


253 


.BYTE TOAT 




000254 


T0AT-T0AT*1 


012324 


254 


.BYTE TOAT 




000255 


T0AT-T0AT*1 


012325 


255 


.BYTE TOAT 




000256 


T0AT-T0AT»1 


012326 


256 


.BYTE TOAT 




000257 


T0AT-TDAT»1 


012327 


257 


.BYTE TOAT 




000260 


TDAT-TDAT»1 


012330 


260 


.BYTE TOAT 




000261 


TDAT-TDAT*1 


012331 


261 


.BYTE TOAT 




000262 


TOAT -TOAT* 1 


012332 


262 


.BYTE TOAT 




000263 


TDAT-TDAT*! 


012333 


263 


.BYTE TOAT 




000264 


TDAT-T0AT»1 


012334 


264 


.BYTE TOAT 




000265 


T0AT-T0AT»1 


012335 


265 


.BYTE TOAT 




000266 


T0AT-TDAT*1 


012336 


266 


.BYTE TOAT 




000267 


T0AT-T0AT»1 


012337 


267 


.BYTE TOAT 




000270 


TDAT"TDAT»1 


012340 


270 


.BYTE TOAT 




000271 


TDAT-TDAT^l 


012341 


271 


.BYTE TOAT 




000272 


TOAT -TOAT* 1 


012342 


272 


.BYTE TOAT 




000273 


TDAT-TDAT^l 


012343 


273 


.BYTE TOAT 




000274 


TDAT»TDAT»1 


012344 


274 


.BYTE TOAT 




000275 


TDAT-TD*T»1 


012345 


275 


.BYTE TOAT 




000276 


TOAT-TOAT*! 


012346 


276 


.BYTE TOAT 




000277 


TOAT -TOAT ♦! 


012347 


277 


.BYTE TOAT 




000300 


TOAT-TOAT*! 


012350 


300 


.BYTE TOAT 




000301 


T0AT-T0AT*1 


012351 


301 


.BYTE TOAT 




000302 


TOAT -TOAT ♦! 


012352 


302 


.BYTE TOAT 




00030J 


TOAT -TOAT* I 


012353 


303 


.BYTE TOAT 




000304 


TOAT -TOAT •I 


012354 


304 


.BYTE TOAT 




000305 


TOAT -TOAT •I 


012355 


305 


.BYTE TOAT 




000306 


TDAT"TDAT»1 


012356 


306 


.BYTE TOAT 
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000307 


TOAT-TOAT*! 


012357 


307 


•BYTE TOAT 




000310 


TOAT-TOAT*! 


012360 


310 


•BYTE TOAT 




000311 


TDAT"T0AT»1 


012361 


311 


.BYTE TOAT 




000312 


TDAT-TDAT'l 


012362 


312 


.BYTE TOAT 




000313 


TDAT-TDAT*1 


012363 


313 


.BYTE TOAT 


• 


000314 


TDAT-TDAT*1 


012364 


314 


.BYTE TOAT 




000315 


TDAT-TDAT*1 


012365 


315 


.BYTE TOAT 




000316 


TOAT "TOAT* 1 


012366 


316 


.BYTE TOAT 




000317 


TDAT-TDAT*1 


012367 


317 


.BYTE TOAT 




000320 


TOAT -TOAT ^l 


012370 


3?0 


.BYTE TOAT 




000321 


TOAT -TOAT ♦I 


012371 


321 


.BYTE TOAT 




000322 


TOAT -TOAT ♦I 


012372 


322 


•BYTE TOAT 




000323 


TOAT -TOAT ♦I 


012373 


323 


•BYTE TOAT 




000324 


TOAT -TOAT ♦I 


012374 


324 


.BYTE TOAT 




000325 


TDAT-TDAT»1 


012375 


325 


.BYTE TOAT 




000326 


TDAT-TDAT»1 


012376 


326 


.BYTE TDAT 




000327 


TDAT-TDAT*1 


012377 


327 


.BYTE TDAT 




000330 


TDAT-T0AT*1 


012400 


330 


.BYTE TDAT 




000331 


TDAT-TDAT»1 


012401 


331 


.BYTE TDAT 




000332 


TDAT-TDAT»1 


012402 


332 


.BYTE TDAT 




000333 


TDAT"T0AT*1 


012403 


333 


.BYTE TDAT 




000334 


TDAT-TDAT»1 


012404 


334 


.BYTE TDAT 




000335 


T0AT-TDAT*1 


012405 


335 


.BYTE TDAT 




000336 


TDAT"TDAT*1 


012406 


336 


.BYTE TDAT 




000337 


TDAT"TDAT*1 


0124C7 


337 


.BYTE TDAT 




000340 


TDAT-TDAT*1 


012410 


340 


.BYTE TDAT 




000341 


TDAT-TDAT*1 


012411 


341 


.BYTE TOAT 




000342 


TDAT "TDAT ♦I 


012412 


342 


.BYTE TDAT 




000343 


TDAT -TOAT ♦I 
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012413 


343 


.BYTE TDAT 




000344 


TDAT-TDAT»1 


012414 


344 


.BYTE TDAT 




000345 


TDAT-TDAT»1 


012415 


345 


•BYTE TDAT 




000346 


TDAT-TDAT»1 


012416 


346 


.BYTE TDAT 




000347 


TDAT-TDAT*1 


012417 


347 


.BYTE TDAT 




000350 


TDAT-TDAT»1 


012420 


350 


.BYTE TDAT 




000351 


TDAT-TDAT*1 


012421 


351 


.BYTE TDAT 




000352 


TDAT-TDAT*1 


012422 


352 


.BYTE TDAT 




000353 


TDAT -TDAT ♦I 


012423 


353 


.BYTE TDAT 




000354 


TDAT -TDAT a 


012424 


354 


.BYTE TDAT 




000355 


TDAT -TDAT ♦I 


012425 


355 


.BYTE TDAT 




000356 


TDAT-TDAT*1 


012426 


356 


.BYTE TDAT 




000357 


TDAT-TDAT*1 


012427 


357 


.BYTE TDAT 




000360 


TDAT-TDAT*1 


012430 


360 


•BYTE TDAT 




000361 


TDAT-TDAT*1 


012431 


361 


.BYTE TDAT 




000362 


TDAT-TDAT*1 


012432 


362 


.BYTE TDAT 




000363 


TDAT -TDAT ♦I 


012433 


363 


.BYTE TDAT 




000364 


TDAT -TDAT ♦I 


012434 


364 


.BYTE TDAT 




000365 


TDAT-TDAT*! 


012435 


365 


.BYTE TDAT 




000366 


TDAT-TDAT*i 


012436 


366 


.BYTE TDAT 




000367 


TDAT -TDAT ♦! 


012437 


367 


.BYTE TDAT 




000370 


TDAT-TDAT*! 


012440 


370 


•BYTE TDAT 




000371 


TDAT-TDAT»1 


012441 


371 


.BYTE TDAT 




000372 


TDAT -TDAT ♦I 


012442 


372 


.BYTE TDAT 




000373 


TDAT -TDAT ♦I 


012443 


373 


.BYTE TDAT 




000374 


TDAT-TDAT*1 


012444 


374 


.BYTE TDAT 




000375 


TDAT -TDAT ♦I 


012445 


375 


.BYTE TDAT 




000376 


TDAT -TDAT ♦I 


012446 


376 


.BYTE TDAT 




000377 


TDAT-TDAT»1 


012447 


377 


.BYTE TDAT 
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SEQ 75 



000400 

25 

26 012450 000000 

27 012512 

28 012S12 



T0*T-T0AT»1 
.EVEN 
R8UF: 0 
.-.♦40 
.PFAIL 

sENTER HERE ON POUER FAILURE 



012512 
012514 
012516 
012520 
012522 
012524 
012526 
012532 
012536 
012544 
012546 



010046 
010146 
010246 
010346 
010446 
010546 
016746 
010667 
012767 
000000 
000777 



PFAIL: 



165272 
177274 
012550 



165260 



HOV 

NOV 

NOV 

NOV 

NOV 

NOV 

MOV 

NOV 

NOV 

HALT 

BR 



RO.-(SP) 
Rl.-(SP) 
R2,-(SP) 
R3,-(SP) 
R4,-(SP) 
R5.-(SP) 
24.-(SP) 
SP.SAVSP 
MESTART.24 



:SAVE RO-RS ON PROCESSOR STACK 



iSAVE STACK POINTER 

I SET UP FOR POUER UP TRAP 

iHALT ON POUER OOUN NORMAL 



{PROCESSOR UILL TRAP HERE UHEN POUER IS RESTORED 



012550 


016706 


177256 




RESTAR : 


MOV 


SAVSP.SP 


012554 


012605 








NOV 


(SP)»,R5 


012556 


012604 








MOV 


(SP)* ,R4 


012560 


012603 








MOV 


(SP)*tR3 


012562 


012602 








MOV 


CSr ,R2 


012564 


012601 








MOV 


lSP)*,Rl 


012566 


012600 








MOV 


CSP>*,RO 


012570 


012767 


012512 


165226 




MOV 


ABf ATI K 

•PFAIL ,24 


012576 


0127p7 


000340 






nyv 


ATAt\ DC 


012604 


012706 


013752 






MOV 


«STACK.SP 


012610 


005067 


000422 






CLR 


TEHP 


012614 


005267 


000416 






INC 


TEMP 


012620 


001375 








BNE 


.-4 


012622 


104401 








TYPE 




012624 


013037 








MGRLF 




012626 


104402 








OCTASC 




012630 


0126S2 








PFTAB 




012632 


104401 








TYPE 




012634 


013042 








MPFAIL 




012636 


005067 


177154 






aR 


ERRFL6 


012642 


005067 


177174 






CLR 


LAST 


012646 


000177 


177132 






JMP 


SRETRN 


012652 


000001 






PFTAB: 


1 




012654 


000006 


000002 






6.2 




012660 


012004 








RETRN 




29 012662 








.MSG 


t/DHll 


SINGLE LINE 


012662 


015 


012 


012 


NTITLE: 


.ASCIZ 


<15><12><1 


012665 


104 


110 


061 








012670 


061 


040 


123 








012673 


111 


116 


107 








012676 


114 


105 


040 








012701 


114 


111 


116 








012704 


105 


040 


120 








012707 


101 


122 


111 








012712 


124 


131 


040 









{RESTORE STACK POINTER 
{RESTORE RO-RS 



iSET UP FOR POUER FAILURE 



5 
5 



PARITY CHECK 6 MULTI-LINE DATA TEST/. t/CZ0H6-C0/ 
?>/DHll SINGLE LINE PARITY CHECK 6 MULTI-LINE DATA TEST /«15><12> 
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S£Q 76 



At 971^ 
Wis ' X3 


1 A1 
lV-9 


1 io 

liv 


lOf^ 

IVJ 




to% 

IV9 


ill 


040 


A1 979* 
Vis 




040 


114 

lU 


Vis f CV 


194 
ls7 


1 14 

11* 


194 

IS* 


01 9711 
Vis / #1 


111 
111 


A44 


114 

A A^ 


A1 97IA 

Vis » 


111 
111 


1 16 

119 


104 

AV^ 


A19717 
Vis f # r 


v^v 


i04 

1*^ 


AVA 


VIS f 


19A 

IS* 


101 

IWA 


040 


0197M 
Vis 


1 94 
Is' 


104 

1V7 


123 

1S9 


01*7 KA 
vis '9V 


194 
IS* 


040 


014 

V17 


019741 
vis 


019 
VIS 


ooo 

V^A* 




Ot97<4 
Vis '39 


014 

V17 


019 

VIS 


126 


Ol 97M 
Vis ' W 


1V3 


101 

1V9 


124 

IS* 


012741 

VIS IW9 


117 


122 


040 


012744 

VIS * w 


101 


104 


104 


012771 

VIS r ' 1 


122 
iss 


105 

AW^ 


123 


019774 

VIS 11^ 


123 

1S9 


044 




019777 

VIS # f f 


014 


012 


103 


018002 

VI 9VVS 


117 


116 

A A V 


124 


01100% 


122 

Aft* 


117 


114 


011010 

VA WAV 


040 


122 


105 


011013 


107 


111 

A A A 


123 




124 


105 


122 




040 


101 


104 


013024 


104 


122 


105 


013027 


123 


123 


055 


013032 


000 






013083 


040 


040 


077 


013036 


000 






013037 


012 


012 


000 


011042 


040 


040 


120 


013045 


117 


127 


105 


OlSOSO 


122 


040 


106 


01 loss 


101 


111 


114 


0110S6 


125 


122 


105 


013041 


054 


040 


120 


013064 


122 


117 


107 


013067 


122 


101 


115 


013072 

W*wW f S 


040 


122 

Aftft 


105 


01S07S 


123 

• ft w 


124 


101 


OlSlOO 


122 


124 


040 


013103 


101 


124 


040 


013106 


124 


105 


123 


OlSlll 


124 


040 


111 


013114 

VA wm A~ 


116 


040 


120 


013117 


122 


117 


107 


013122 


122 


105 


123 


01S12S 


123 

Aft w 


000 




013127 


015 


012 


103 


0131S2 


132 


104 


110 


01 SI 35 


107 


055 


103 


013140 


060 


000 




01S142 


015 


012 


120 


013145 


101 


125 


123 


013150 


040 


103 


117 


OISISS 


125 


116 


124 



HVECTO: .ASCIZ <15><12>/VECT0R MMMESS-/ 



HREGM): .ASCIZ <15><12> /CONTROL REGISTER ADDRESS-/ 



nON: .ASCIZ / ?/ 
HCRLF: .ASCIZ <15><12> 

MPFAIL: .ASCIZ / POUER FAILURE, PROGRAM RESTART AT TEST IN PROGRESS/ 



NEPASS: .ASCIZ <15><12>/CZ0HG-C0/ 



PASTXT: .ASCIZ <15><12>/PASS COUNT • / 



I 5 
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SEQ 77 



0131S6 


040 


075 


040 






01S161 


000 










013162 


015 


012 


122 


m-. .ASCIZ 


<1S><12>/R/ 


01Y16S 


000 










01S16A 


015 


012 


124 


nrSTPC: .ASCIZ 


<15><12>/TEST 


01S171 


105 


123 


124 






01S174 


040 


120 


103 






015177 


055 


000 









30 

31 01S202 



013202 
013204 
013206 
013210 
013212 
013214 
013216 
013220 
013222 
32 01S224 



01S224 
01S2S6 

013250 
S3 013262 



013262 

34 013262 

35 01S264 

36 013266 

37 013270 

38 013272 

39 013274 

40 013276 

41 OlSSOO 

42 013302 

43 013304 

44 013306 

45 013310 

46 013312 
01SS15 
013320 
013323 
013326 
OiSSSl 



010566 
011150 
011470 
011202 
011274 
011304 
011642 
011702 
010666 



000000 
013236 
000000 
013250 

000000 
013262 



013312 
000000 
013337 
000000 
013373 
000000 
013414 
013534 
013455 
000000 
013503 
000000 
125 
130 
103 
104 
116 
122 



.EVEN 
.EVEN 
.TRPTAB 



iTMLE OF POINTERS FOR TRAP DECODING 



TRPTM: SCOPER 
TYPER 
OCTASN 
INSTRG 
INSTRE 
PARAHS 
SVOSP 
RS05 
SCOPIR 

.BUFFER 



INBUF: 
.-.♦10 
TEMP: 0 
.-.♦10 



nOATA: 0 

.-.♦10 

.ERRTAB 



(BUFFERS FOR INPUT -OUTPUT 
0 



I TABLE OF POINTERS TO ERROR NESSAGES AND DATA 



ERRTAB: 



116 
120 
124 
040 
124 
122 



105 
105 
105 
111 
105 
125 



ENO: 



Eno 

0 

ENl 
0 

EH2 
0 

En3 
OTl 
EN4 
0 

En5 

0 

.ASCIZ 



/UNEXPECTED INTERRUPT/ 



CZ0H6-C0 



HACRO V04.00 27-JUN-S5 13:01:40 PAGE 24-18 



SEQ 78 



013334 


120 


124 


000 


47 013337 


103 


110 


101 


013342 


122 


101 


103 


013345 


124 


105 


122 


013350 


040 


101 


126 


013353 


101 


111 


114 


013356 


101 


102 


114 


013361 


105 


040 


116 


013364 


117 


124 


040 


013367 


123 


105 


124 


013372 


000 






48 013373 


123 


111 


114 


013376 


117 


040 


117 


013401 


126 


105 


122 


013404 


122 


125 


116 


013407 


040 


123 


105 


013412 


124 


000 




49 013414 


104 


101 


124 


013417 


101 


040 


105 


013422 


122 


122 


117 


013425 


122 






50 013426 


015 


012 


105 


013431 


130 


120 


040 


013434 


040 


040 


040 


013437 


040 


122 


105 


013442 


103 


040 


040 


013445 


040 


040 


040 


013450 


114 


111 


116 


013453 


105 


000 




51 013455 


124 


122 


101 


013460 


116 


123 


115 


01S46S 


111 


124 


040 


013466 


104 


117 


116 


013471 


105 


040 


116 


013474 


117 


124 


040 


013477 


123 


105 


124 


013502 


000 






52 013503 


103 


110 


101 


013506 


122 


101 


103 


013511 


124 


105 


122 


013514 


040 


101 


126 


013517 


101 


111 


114 


013522 


101 


102 


114 


013525 


105 


040 


123 


013SS0 


105 


124 


000 



53 
54 
55 
56 

57 013534 000003 

58 013S96 006 002 

59 01SS40 012030 

60 013542 006 002 

61 013544 012020 

62 013546 002 000 

63 0195S0 012024 

64 013552 



Eni: .ASCIZ /CHARACTER AVAILABLE NOT SET/ 



En2! .ASCIZ /SILO OVERRUN SET/ 



En3: .ASCII /OAT A ERROR/ 



.ASCIZ <15><12>/EXP REC LINE/ 



En4: .ASCIZ /TRANSHIT DONE NOT SET/ 



ENS: .ASCXZ /CHARACTER AVAILABLE SET/ 



.EVEN 

iDATA TAILES FOR ERRORS 

OTli S 
.■VIE 6.2 

SAVRS 
.BYTE §.2 

SAVRl 
.BYTE 2.0 

SAVRS 

.EiOCOD 



C20HG-C0 MACRO V04.00 27 JUN-85 13:01:48 PAGE 24-19 



013552 OOOOOC ENOCOO: 0 

6S 000001 .END 



CZOHG-CO MACRO VCK.OO 27-JUN-65 13:01:48 PAGE 24-20 

SrreOL TA8LE 



AORCNT> 


011467 


En2 


013373 


MOM 


013033 


BARSIT 


010426 


EMS 


013414 


MR 


013162 


eCGXN 


001306 


EM4 


013455 


MREGAO 


012777 


BINVRO 


011640 


EM5 


013503 


MSG 


011216 


eiTX - 


000000 


ENDCOO 


013552 


MTITLE 


012662 


BITOO - 


000001 


ENOFLG 


012044 


MTSTPC 


013166 


BITOl • 


000002 


EOP 


010466 


MVECTO 


012755 


BIT02 - 


OOOOM 


ERRCNT 


012002 


N 


000001 


BIT03 - 


000010 


ERRFLG 


011776 


OCTASC- 


104402 


BIT04 - 


000020 


ERRMSG 


011024 


OCTASN 


011470 


BIT05 - 


000040 


ERRORS 


010704 


PARAM - 


104405 


BIT06 • 


000100 


ERRTA6 


013262 


PARAMS 


011304 


BIT07 - 


000200 


ERTABO 


011110 


PARAMl 


011334 


BIT08 - 


000400 


ESCAPE 


012006 


PARERR 


011410 


BIT09 - 


001000 


EXITER 


011066 


PASARG 


010560 


BITIO - 


002000 


FREEZl 


012010 


PASCNT 


012000 


BITll - 


004000 


HALTS 


011046 


PASTXT 


013142 


BIT12 • 


010000 


MILIM 


011462 


PFAIL 


012512 


BIT13 - 


0<!0000 


ICOUNT 


012012 


PFTAB 


012652 


BIT14 - 


040000 


INBUF 


013224 


POPRO - 


012600 


BIT15 - 


100000 


INIFLG 


012036 


POPISP- 


005726 


CHRCNT 


011636 


INSTER- 


104404 


P0P2SP- 


022626 


OATABP 


011042 


INSTR - 


104403 


PS 


177776 


DEVAOR 


011464 


INSTRE 


011Z74 


PUSHRO- 


010046 


OHBA 


011752 


INSTRG 


011202 


PUSH1S> 


005746 


OHBAft 


011756 


INSTRl 


011214 


PUSH2S- 


024646 


0H8C 


011754 


INSTR2 


011302 


R8UF 


012450 


O^CR 


011760 


LAST 


012042 


RESRE6 


011044 


OHLPR 


011750 


LIGHTS 


001002 


RESTAR 


012S50 


OHNRC 


011746 


LIMITS 


011414 


RESTRT 


010554 


OHRLVL 


011770 


LINE - 


0C0020 


RESOS - 


104407 


DHRVEC 


011766 


LOBITS 


011466 


RETRN 


012004 


OHSCR 


011744 


LOGICA 


010544 


RS05 


011702 


OH SLR 


011764 


LOLIM 


011460 


SAVPC 


012034 


OHSSR 


011762 


LPCNT 


012014 


SAVRO 


012016 


nuTi i/i 

Un 1 L VL 












OHTVEC 


011772 


MDATA 


013250 


SAVR2 


012022 


DTI 


013534 


MEPASS 


013127 


SAVR3 


012024 


EtIO 


013312 


MPFAIL 


013042 


SAVR4 


012026 


EMI 


013337 










. ABS. 


013554 


000 









000000 001 
ERRORS DETECTED: 0 

VIRTUAL MEMORY USED: 18944 WORDS ( 74 PAGES) 

DYNAMIC MEMORY AVAILABLE FOR 71 PAGES 

CZDHGC . BIN . CZOHGC . SEQ- CZOHGC . DOC , OHMAC A . MAC , CZDHGC . P 11 



SEQ 80 



SmVR5 


012030 


TRPTAB 


013202 


SAVSP 


012032 


TYPDAT 


011026 


SAV05P- 


104406 


TYPE ■ 


104401 


SCOPE ■ 


104400 


TYPER 


011150 


SCOPER 


010566 


TYPMS& 


011004 


SCOPEl- 


104410 


Tl 


001400 


SCOPIR 


010666 


TIO 


002656 


SPACNT- 


011637 


Til 


003020 


STACK ■ 


013752 


T12 


003162 


START 


001004 


T13 


003324 


STFLG 


012040 


T14 


003466 


SV05 


011650 


T15 


003630 


SV05P 


011642 


T16 


003772 


SUR 


001000 


Tl? 


004134 


SUOO - 


000001 


T2 


001542 


SUOl > 


000002 


T20 


004276 


SU02 - 


000004 


T21 


004440 


SU03 - 


000010 


T22 


004744 


SU04 - 


000020 


T23 


005250 


SU05 - 


000040 


T24 


005554 


SU06 - 


OOOiOO 


T25 


006060 


SU08 - 


000400 


T26 


006364 


SW09 - 


001000 


T27 


006670 


SUlO - 


002000 


T3 


001704 


SUll - 


004000 


T30 


007174 


SU12 - 


010000 


T31 


007500 


SUIS - 


020000 


T32 


007776 


SU14 - 


040000 


T4 


002046 


SU15 - 


100000 


T5 


002210 


TBUF 


012050 


T6 


002352 


TOAT - 


000«00 


T7 


002514 


TOATA 


012046 


VECl 


001164 


TEMP 


013236 


VEC2 


001174 


TKCSR 


011734 


UROCNT 


011634 


TKDBR 


011736 


X 


000000 


TPCSR 


011740 


XBIT - 


000001 


TPOBR 


011742 


XLINE - 


000000 


TRPOK 


011130 


XN 


000033 


TRPSRV 


011116 


Y 


000011 



